A085787 -id:A085787 - cp's OEIS frontend

A074377 Generalized 10-gonal numbers: m(4m - 3) for m = 0, +- 1, +- 2, +- 3, ...

0, 1, 7, 10, 22, 27, 45, 52, 76, 85, 115, 126, 162, 175, 217, 232, 280, 297, 351, 370, 430, 451, 517, 540, 612, 637, 715, 742, 826, 855, 945, 976, 1072, 1105, 1207, 1242, 1350, 1387, 1501, 1540, 1660, 1701, 1827, 1870, 2002, 2047, 2185, 2232, 2376, 2425

Offset: 0

W. Neville Holmes, Sep 04 2002

Also called generalized decagonal numbers.
Odd triangular numbers decremented and halved.
It appears that this is zero together with the partial sums of A165998. - Omar E. Pol, Sep 10 2011 [this is correct, see the g.f., Joerg Arndt, Sep 29 2013]
Also, A033954 and positive members of A001107 interleaved. - Omar E. Pol, Aug 04 2012
Also, numbers m such that 16*m+9 is a square. After 1, therefore, there are no squares in this sequence. - Bruno Berselli, Jan 07 2016
Convolution of the sequences A047522 and A059841. - Ilya Gutkovskiy, Mar 16 2017
Numbers k such that the concatenation k5625 is a square. - Bruno Berselli, Nov 07 2018
Exponents in expansion of Product_{n >= 1} (1 + x^(8*n-7))*(1 + x^(8*n-1))*(1 - x^(8*n)) = 1 + x + x^7 + x^10 + x^22 + .... - Peter Bala, Dec 10 2020

Vincenzo Librandi, Table of n, a(n) for n = 0..1000
Neville Holmes, More Gemometric Integer Sequences. [Wayback Machine copy]
Index entries for linear recurrences with constant coefficients, signature (1,2,-2,-1,1).

Cf. A011848, A014493, A074378, A118277, A165998.
Cf. A001107 (10-gonal numbers).
Column 6 of A195152.
Sequences of generalized k-gonal numbers: A001318 (k=5), A000217 (k=6), A085787 (k=7), A001082 (k=8), A118277 (k=9), this sequence (k=10), A195160 (k=11), A195162 (k=12), A195313 (k=13), A195818 (k=14), A277082 (k=15), A274978 (k=16), A303305 (k=17), A274979 (k=18), A303813 (k=19), A218864 (k=20), A303298 (k=21), A303299 (k=22), A303303 (k=23), A303814 (k=24), A303304 (k=25), A316724 (k=26), A316725 (k=27), A303812 (k=28), A303815 (k=29), A316729 (k=30).
Cf. sequences of the form m*(m+k)/(k+1) listed in A274978. [Bruno Berselli, Jul 25 2016]

[n^2+n-1/4+(-1)^n/4+n*(-1)^n/2: n in [0..50]]; // Vincenzo Librandi, Sep 29 2013

CoefficientList[Series[x(1 +6x +x^2)/((1-x)(1-x^2)^2), {x, 0, 50}], x] (* Vincenzo Librandi, Sep 29 2013 *)
LinearRecurrence[{1,2,-2,-1,1}, {0,1,7,10,22}, 50] (* G. C. Greubel, Nov 07 2018 *)

PARI
```
a(n)=(2*n+3-4*(n%2))*(n-n\2)
```

concat([0],Vec(x*(1 + 6*x + x^2)/((1 - x)*(1 - x^2)^2) +O(x^50))) \\ Indranil Ghosh, Mar 16 2017

def A074377(n): return (n+1>>1)*((n<<1)+(-1 if n&1 else 3)) # Chai Wah Wu, Mar 11 2025

(n(n+1)-2)/4 where n(n+1)/2 is odd.
G.f.: x*(1+6*x+x^2)/((1-x)*(1-x^2)^2). - Michael Somos, Mar 04 2003
a(2*k) = k*(4*k+3); a(2*k+1) = (2*k+1)^2+k. - Benoit Jubin, Feb 05 2009
a(n) = n^2+n-1/4+(-1)^n/4+n*(-1)^n/2. - R. J. Mathar, Oct 08 2011
Sum_{n>=1} 1/a(n) = (4 + 3*Pi)/9. - Vaclav Kotesovec, Oct 05 2016
E.g.f.: exp(x)*x^2 + (2*exp(x) - exp(-x)/2)*x - sinh(x)/2. - Ilya Gutkovskiy, Mar 16 2017
Sum_{n>=1} (-1)^(n+1)/a(n) = 2*log(2) - 4/9. - Amiram Eldar, Feb 28 2022
a(n) = (n+1)*(2*n-1)/2 if n is odd and a(n) = n*(2*n+3)/2 if n is even. - Chai Wah Wu, Mar 11 2025

New name from T. D. Noe, Apr 21 2006

Formula in sequence name from Omar E. Pol, May 28 2012

A005901 Number of points on surface of cuboctahedron (or icosahedron): a(0) = 1; for n > 0, a(n) = 10n^2 + 2. Also coordination sequence for f.c.c. or A_3 or D_3 lattice.

Original entry on oeis.org

1, 12, 42, 92, 162, 252, 362, 492, 642, 812, 1002, 1212, 1442, 1692, 1962, 2252, 2562, 2892, 3242, 3612, 4002, 4412, 4842, 5292, 5762, 6252, 6762, 7292, 7842, 8412, 9002, 9612, 10242, 10892, 11562, 12252, 12962, 13692, 14442, 15212, 16002

Offset: 0

N. J. A. Sloane, R. Vaughan

Sequence found by reading the segment (1, 12) together with the line from 12, in the direction 12, 42, ..., in the square spiral whose vertices are the generalized heptagonal numbers A085787. - Omar E. Pol, Jul 18 2012

H. S. M. Coxeter, "Polyhedral numbers," in R. S. Cohen et al., editors, For Dirk Struik. Reidel, Dordrecht, 1974, pp. 25-35.
Gmelin Handbook of Inorg. and Organomet. Chem., 8th Ed., 1994, TYPIX search code (225) cF4
B. Grünbaum, Uniform tilings of 3-space, Geombinatorics, 4 (1994), 49-56. See tiling #1.
R. W. Marks and R. B. Fuller, The Dymaxion World of Buckminster Fuller. Anchor, NY, 1973, p. 46.
S. Rosen, Wizard of the Dome: R. Buckminster Fuller; Designer for the Future. Little, Brown, Boston, 1969, p. 109.
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).

T. D. Noe, Table of n, a(n) for n = 0..1000
M. Baake and U. Grimm, Coordination sequences for root lattices and related graphs, arXiv:cond-mat/9706122, Zeit. f. Kristallographie, 212 (1997), 253-256
R. Bacher, P. de la Harpe and B. Venkov, Séries de croissance et séries d'Ehrhart associées aux réseaux de racines, C. R. Acad. Sci. Paris, 325 (Series 1) (1997), 1137-1142.
J. H. Conway and N. J. A. Sloane, Low-Dimensional Lattices VII: Coordination Sequences, Proc. Royal Soc. London, A453 (1997), 2369-2389 (pdf).
R. W. Grosse-Kunstleve, Coordination Sequences and Encyclopedia of Integer Sequences
R. W. Grosse-Kunstleve, G. O. Brunner and N. J. A. Sloane, Algebraic Description of Coordination Sequences and Exact Topological Densities for Zeolites, Acta Cryst., A52 (1996), pp. 879-889.
G. Nebe and N. J. A. Sloane, Home page for this lattice
M. O'Keeffe, Coordination sequences for lattices, Zeit. f. Krist., 210 (1995), 905-908.
M. O'Keeffe, Coordination sequences for lattices, Zeit. f. Krist., 210 (1995), 905-908. [Annotated scanned copy]
Simon Plouffe, Approximations de séries génératrices et quelques conjectures, Dissertation, Université du Québec à Montréal, 1992; arXiv:0911.4975 [math.NT], 2009.
Simon Plouffe, 1031 Generating Functions, Appendix to Thesis, Montreal, 1992
Reticular Chemistry Structure Resource (RCSR), The fcu tiling (or net)
N. J. A. Sloane, A portion of the f.c.c. lattice packing.
B. K. Teo and N. J. A. Sloane, Magic numbers in polygonal and polyhedral clusters, Inorgan. Chem. 24 (1985), 4545-4558.
K. Urner, Microarchitecture of the Virus
R. Vaughan & N. J. A. Sloane, Correspondence, 1975
Wikipedia, Cuboctahedron
Index entries for sequences related to f.c.c. lattice
Index entries for linear recurrences with constant coefficients, signature (3,-3,1).

Cf. A000217, A000290, A004015, A027599.
Cf. A033583, A062786, A092277, A206399.
Partial sums give A005902.
The 28 uniform 3D tilings: cab: A299266, A299267; crs: A299268, A299269; fcu: A005901, A005902; fee: A299259, A299265; flu-e: A299272, A299273; fst: A299258, A299264; hal: A299274, A299275; hcp: A007899, A007202; hex: A005897, A005898; kag: A299256, A299262; lta: A008137, A299276; pcu: A005899, A001845; pcu-i: A299277, A299278; reo: A299279, A299280; reo-e:  A299281, A299282; rho: A008137, A299276; sod: A005893, A005894; sve: A299255, A299261; svh: A299283, A299284; svj: A299254, A299260; svk: A010001, A063489; tca: A299285, A299286; tcd: A299287, A299288; tfs: A005899, A001845; tsi: A299289, A299290; ttw: A299257, A299263; ubt: A299291, A299292; bnn: A007899, A007202. See the Proserpio link in A299266 for overview.

[n eq 0 select 1 else 2*(5*n^2+1): n in [0..55]]; // G. C. Greubel, May 25 2023

Join[{1},10*Range[40]^2+2] (* or *) Join[{1},LinearRecurrence[{3,-3,1},{12,42,92},40]] (* Harvey P. Dale, May 28 2014 *)

PARI
```
a(n)=if(n<0,0,10*n^2+1+(n>0))
```

[2*(5*n^2 + 1)-int(n==0) for n in range(56)] # G. C. Greubel, May 25 2023

G.f.: (1+x)*(1+8*x+x^2)/(1-x)^3. - Simon Plouffe in his 1992 dissertation
G.f. for coordination sequence for A_n lattice is (1-z)^(-n) *  Sum_{i=0..n} binomial(n, i)^2*z^i. [Bacher et al.]
a(n+1) = A027599(n+2) + A092277(n+1) - Creighton Dement, Feb 11 2005
a(n) = 2 + A033583(n), n >= 1. - Omar E. Pol, Jul 18 2012
a(n) = 12 + 24*(n-1) + 8*A000217(n-2) + 6*A000290(n-1). The properties of the cuboctahedron, namely, its number of vertices (12), edges (24), and faces as well as face-type (8 triangles and 6 squares), are involved in this formula. - Peter M. Chema, Mar 26 2017
a(n) = A062786(n) + A062786(n+1). - R. J. Mathar, Feb 28 2018
E.g.f.: -1 + 2*(1 + 5*x + 5*x^2)*exp(x). - G. C. Greubel, May 25 2023
Sum{n>=0} 1/a(n) = 3/4 + Pi*sqrt(5)*coth(Pi/sqrt 5)/20 = 1.14624... - R. J. Mathar, Apr 27 2024

A118277 Generalized 9-gonal (or enneagonal) numbers: m(7m - 5)/2 with m = 0, 1, -1, 2, -2, 3, -3, ...

Original entry on oeis.org

0, 1, 6, 9, 19, 24, 39, 46, 66, 75, 100, 111, 141, 154, 189, 204, 244, 261, 306, 325, 375, 396, 451, 474, 534, 559, 624, 651, 721, 750, 825, 856, 936, 969, 1054, 1089, 1179, 1216, 1311, 1350, 1450, 1491, 1596, 1639, 1749, 1794, 1909, 1956, 2076, 2125, 2250

Offset: 0

T. D. Noe, Apr 21 2006

Partial sums of A195140. - Omar E. Pol, Sep 13 2011
The characteristic function starts 1, 1, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0 , ... and has the generating function f(x,x^6) in terms of Ramanujan's two-variable theta function. See A080995, A010054, A133100 etc. - Omar E. Pol, Jul 13 2012
Also A179986 and positive terms of A001106 interleaved. - Omar E. Pol, Aug 04 2012
Sequence provides all integers m such that 56*m + 25 is a square. - Bruno Berselli, Oct 07 2015

Vincenzo Librandi, Table of n, a(n) for n = 0..10000
Index entries for linear recurrences with constant coefficients, signature (1,2,-2,-1,1).

Cf. A001106 (9-gonal numbers).
Column 5 of A195152.
Cf. A195140.
Sequences of generalized k-gonal numbers: A001318 (k=5), A000217 (k=6), A085787 (k=7), A001082 (k=8), this sequence (k=9), A074377 (k=10), A195160 (k=11), A195162 (k=12), A195313 (k=13), A195818 (k=14), A277082 (k=15), A274978 (k=16), A303305 (k=17), A274979 (k=18), A303813 (k=19), A218864 (k=20), A303298 (k=21), A303299 (k=22), A303303 (k=23), A303814 (k=24), A303304 (k=25), A316724 (k=26), A316725 (k=27), A303812 (k=28), A303815 (k=29), A316729 (k=30).

[7*n^2/8+7*n/8-3/16+3*(-1)^n*(1/16+n/8): n in [0..50]]; // Vincenzo Librandi, Oct 10 2011

n=9; Union[Table[i((n-2)i-(n-4))/2, {i,-30,30}]]
LinearRecurrence[{1,2,-2,-1,1},{0,1,6,9,19},60] (* Harvey P. Dale, Jun 08 2016 *)

a(n)=7*n*(n+1)/8-3/16+3*(-1)^n*(1+2*n)/16 \\ Charles R Greathouse IV, Jan 18 2012

a(n) = n*(7*n-5)/2 for positive and negative n.
a(n) = (1/16)*(14*n^2 + 14*n - 3 + 3*(-1)^n*(2*n + 1)). - R. J. Mathar, Oct 08 2011
G.f.: x*(1+5*x+x^2) / ( (1+x)^2*(1-x)^3 ). - R. J. Mathar, Oct 08 2011
Sum_{n>=1} 1/a(n) = 2*(7 + 5*Pi*tan(3*Pi/14))/25. - Vaclav Kotesovec, Oct 05 2016
E.g.f.: (1/16)*(3*(1 - 2*x)*exp(-x) + (-3 + 28*x + 14*x^2)*exp(x)). - G. C. Greubel, Aug 19 2017

Extended Name by Omar E. Pol, Jul 28 2018

A195162 Generalized 12-gonal numbers: k(5k-4) for k = 0, +-1, +-2, ...

Original entry on oeis.org

0, 1, 9, 12, 28, 33, 57, 64, 96, 105, 145, 156, 204, 217, 273, 288, 352, 369, 441, 460, 540, 561, 649, 672, 768, 793, 897, 924, 1036, 1065, 1185, 1216, 1344, 1377, 1513, 1548, 1692, 1729, 1881, 1920, 2080, 2121, 2289, 2332, 2508, 2553, 2737, 2784, 2976, 3025

Offset: 0

Omar E. Pol, Sep 10 2011

Also generalized dodecagonal numbers.
Second 12-gonal numbers (A135705) and positive terms of A051624 interleaved. - Omar E. Pol, Aug 04 2012
The characteristic function of this sequence is A205988. - Jason Kimberley, Nov 15 2012
Also, integer values of m*(m+4)/5. - Bruno Berselli, Dec 05 2012
Also, numbers h such that 5*h + 4 is a square. - Bruno Berselli, Oct 10 2013
Exponents in expansion of Product_{n >= 1} (1 + x^(10*n-9))*(1 + x^(10*n-1))*(1 - x^(10*n)) = 1 + x + x^9 + x^12 + x^28 + .... - Peter Bala, Dec 10 2020

Vincenzo Librandi, Table of n, a(n) for n = 0..10000
S. Cooper and M. D. Hirschhorn, Results of Hurwitz type for three squares, Discrete Math. , Vol. 274, No. 1-3 (2004), pp. 9-24. See E(q).
John Elias, Generalized 12-gonal & 20-gonal Cross Configurations
Index entries for linear recurrences with constant coefficients, signature (1,2,-2,-1,1).

Partial sums of A195161.
Column 8 of A195152.
Sequences of generalized k-gonal numbers: A001318 (k=5), A000217 (k=6), A085787 (k=7), A001082 (k=8), A118277 (k=9), A074377 (k=10), A195160 (k=11), this sequence (k=12), A195313 (k=13), A195818 (k=14), A277082 (k=15), A274978 (k=16), A303305 (k=17), A274979 (k=18), A303813 (k=19), A218864 (k=20), A303298 (k=21), A303299 (k=22), A303303 (k=23), A303814 (k=24), A303304 (k=25), A316724 (k=26), A316725 (k=27), A303812 (k=28), A303815 (k=29), A316729 (k=30).
Cf. A001622, A051624, A135705.
Cf. sequences of the form m*(m+k)/(k+1) listed in A274978. [Bruno Berselli, Jul 25 2016]

List([0..50], n-> (10*n^2 +10*n -3 +3*(-1)^n*(2*n+1))/8); # G. C. Greubel, Jul 04 2019

[0] cat &cat[[5*n^2-4*n, 5*n^2+4*n]: n in [1..25]]; // Vincenzo Librandi, Sep 26 2011

nn = 25; Sort[Table[n*(5*n - 4), {n, -nn, nn}]] (* T. D. Noe, Sep 23 2011 *)

vector(50, n, n--; (10*n^2 +10*n -3 +3*(-1)^n*(2*n+1))/8) \\ G. C. Greubel, Jul 04 2019

[(10*n^2 +10*n -3 +3*(-1)^n*(2*n+1))/8 for n in (0..50)] # G. C. Greubel, Jul 04 2019

From R. J. Mathar, Sep 24 2011: (Start)
a(n) = a(n-1) + 2*a(n-2) - 2*a(n-3) - a(n-4) + a(n-5).
a(n) = A008805(n-1) + A008805(n-3) + 8*A008805(n-2). (End)
From Bruno Berselli, Sep 26 2011: (Start)
G.f.: x*(1+8*x+x^2)/((1+x)^2*(1-x)^3).
a(n) = (10*n*(n+1) + 3*(2*n+1)*(-1)^n - 3)/8.
a(n) = a(-n-1). (End)
Sum_{n>=1} 1/a(n) = (5 + 4*sqrt(1 + 2/sqrt(5))*Pi)/16. - Vaclav Kotesovec, Oct 05 2016
E.g.f.: (3*(1 - 2*x)*exp(-x) + (-3 +20*x +10*x^2)*exp(x))/8. - G. C. Greubel, Jul 04 2019
Sum_{n>=1} (-1)^(n+1)/a(n) = 5*log(5)/8 + sqrt(5)*log(phi)/4 - 5/16, where phi is the golden ratio (A001622). - Amiram Eldar, Feb 28 2022

A195160 Generalized 11-gonal (or hendecagonal) numbers: m(9m - 7)/2 with m = 0, 1, -1, 2, -2, 3, -3, ...

Original entry on oeis.org

0, 1, 8, 11, 25, 30, 51, 58, 86, 95, 130, 141, 183, 196, 245, 260, 316, 333, 396, 415, 485, 506, 583, 606, 690, 715, 806, 833, 931, 960, 1065, 1096, 1208, 1241, 1360, 1395, 1521, 1558, 1691, 1730, 1870, 1911, 2058, 2101, 2255, 2300, 2461, 2508, 2676

Offset: 0

Omar E. Pol, Sep 10 2011

Exponents of q in the expansion of Product_{n >= 1} (1 - q^(9*n))*(1 + q^(9*n-1))*(1 + q^(9*n-8)) = 1 + q + q^8 + q^11 + q^25 + q^30 + .... - Peter Bala, Nov 21 2024

Vincenzo Librandi, Table of n, a(n) for n = 0..1000
Index entries for linear recurrences with constant coefficients, signature (1,2,-2,-1,1).

Partial sums of A195159.
Column 7 of A195152.
Cf. A316672.
Sequences of generalized k-gonal numbers: A001318 (k=5), A000217 (k=6), A085787 (k=7), A001082 (k=8), A118277 (k=9), A074377 (k=10), this sequence (k=11), A195162 (k=12), A195313 (k=13), A195818 (k=14), A277082 (k=15), A274978 (k=16), A303305 (k=17), A274979 (k=18), A303813 (k=19), A218864 (k=20), A303298 (k=21), A303299 (k=22), A303303 (k=23), A303814 (k=24), A303304 (k=25), A316724 (k=26), A316725 (k=27), A303812 (k=28), A303815 (k=29), A316729 (k=30).

I:=[0, 1, 8, 11, 25]; [n le 5 select I[n] else Self(n-1)+2*Self(n-2)-2*Self(n-3)-Self(n-4)+Self(n-5): n in [1..50]]; // Vincenzo Librandi, Apr 09 2013

CoefficientList[Series[x (1 + 7 x + x^2)/((1 + x)^2 (1 - x)^3), {x, 0, 60}], x] (* Vincenzo Librandi, Apr 09 2013 *)

a(n)=(18*n*(n+1)+5*(2*n+1)*(-1)^n-5)/16 \\ Charles R Greathouse IV, Sep 24 2015

From Bruno Berselli, Sep 14 2011: (Start)
G.f.: x*(1+7*x+x^2)/((1+x)^2*(1-x)^3).
a(n) = (18*n*(n+1)+5*(2*n+1)*(-1)^n-5)/16.
a(2n) = A062728(n), a(2n-1) = A051682(n). (End)
Sum_{n>=1} 1/a(n) = 18/49 + 2*Pi*cot(2*Pi/9)/7. - Vaclav Kotesovec, Oct 05 2016

A195313 Generalized 13-gonal numbers: m(11m-9)/2 with m = 0, 1, -1, 2, -2, 3, -3, ...

Original entry on oeis.org

0, 1, 10, 13, 31, 36, 63, 70, 106, 115, 160, 171, 225, 238, 301, 316, 388, 405, 486, 505, 595, 616, 715, 738, 846, 871, 988, 1015, 1141, 1170, 1305, 1336, 1480, 1513, 1666, 1701, 1863, 1900, 2071, 2110, 2290, 2331, 2520, 2563, 2761, 2806, 3013, 3060, 3276

Offset: 0

Omar E. Pol, Sep 14 2011

Also generalized tridecagonal numbers or generalized triskaidecagonal numbers.
Also A211013 and positive terms of A051865 interleaved. - Omar E. Pol, Aug 04 2012
Numbers k for which 88*k + 81 is a square. - Bruno Berselli, Jul 10 2018

Vincenzo Librandi, Table of n, a(n) for n = 0..10000
Index entries for linear recurrences with constant coefficients, signature (1,2,-2,-1,1).

Partial sums of A195312.
Column 9 of A195152.
Cf. A316672.
Sequences of generalized k-gonal numbers: A001318 (k=5), A000217 (k=6), A085787 (k=7), A001082 (k=8), A118277 (k=9), A074377 (k=10), A195160 (k=11), A195162 (k=12), this sequence (k=13), A195818 (k=14), A277082 (k=15), A274978 (k=16), A303305 (k=17), A274979 (k=18), A303813 (k=19), A218864 (k=20), A303298 (k=21), A303299 (k=22), A303303 (k=23), A303814 (k=24), A303304 (k=25), A316724 (k=26), A316725 (k=27), A303812 (k=28), A303815 (k=29), A316729 (k=30).

[(22*n*(n+1)+7*(2*n+1)*(-1)^n-7)/16: n in [0..50]]; // Vincenzo Librandi, Sep 16 2011

A195313:=func; [0] cat [A195313(n*m): m in [1,-1], n in [1..25]]; // Bruno Berselli, Nov 13 2012

a:= n-> (m-> m*(11*m-9)/2)(-ceil(n/2)*(-1)^n):
seq(a(n), n=0..60);  # Alois P. Heinz, Jul 10 2018

lim = 50; Sort[Table[n*(11*n - 9)/2, {n, -lim, lim}]] (* T. D. Noe, Sep 15 2011 *)
Accumulate[With[{nn=30},Riffle[9Range[0,nn],Range[1,2nn+1,2]]]] (* Harvey P. Dale, Sep 24 2011 *)

a(n)=(22*n*(n+1)+7*(2*n+1)*(-1)^n-7)/16 \\ Charles R Greathouse IV, Sep 24 2015

From Bruno Berselli, Sep 15 2011: (Start)
G.f.: x*(1 + 9*x + x^2)/((1 + x)^2*(1 - x)^3).
a(n) = (22*n*(n + 1) + 7*(2*n + 1)*(-1)^n - 7)/16.
a(n) - a(n-2) = A175885(n). (End)
Sum_{n>=1} 1/a(n) = 22/81 + 2*Pi*cot(2*Pi/11)/9. - Vaclav Kotesovec, Oct 05 2016

A195818 Generalized 14-gonal numbers: m(6m-5), m = 0,+1,-1,+2,-2,+3,-3,...

Original entry on oeis.org

0, 1, 11, 14, 34, 39, 69, 76, 116, 125, 175, 186, 246, 259, 329, 344, 424, 441, 531, 550, 650, 671, 781, 804, 924, 949, 1079, 1106, 1246, 1275, 1425, 1456, 1616, 1649, 1819, 1854, 2034, 2071, 2261, 2300, 2500, 2541, 2751, 2794, 3014, 3059, 3289

Offset: 0

Omar E. Pol, Sep 29 2011

Also generalized tetradecagonal numbers or generalized tetrakaidecagonal numbers.
Also A211014 and positive terms of A051866 interleaved. - Omar E. Pol, Aug 04 2012
Exponents in expansion of Product_{n >= 1} (1 + x^(12*n-11))*(1 + x^(12*n-1))*(1 - x^(12*n)) = 1 + x + x^11 + x^14 + x^34 + .... - Peter Bala, Dec 10 2020

Vincenzo Librandi, Table of n, a(n) for n = 0..10000
Index entries for linear recurrences with constant coefficients, signature (1,2,-2,-1,1).

Partial sums of A195817.
Column 10 of A195152.
Sequences of generalized k-gonal numbers: A001318 (k=5), A000217 (k=6), A085787 (k=7), A001082 (k=8), A118277 (k=9), A074377 (k=10), A195160 (k=11), A195162 (k=12), A195313 (k=13), this sequence (k=14), A277082 (k=15), A274978 (k=16), A303305 (k=17), A274979 (k=18), A303813 (k=19), A218864 (k=20), A303298 (k=21), A303299 (k=22), A303303 (k=23), A303814 (k=24), A303304 (k=25), A316724 (k=26), A316725 (k=27), A303812 (k=28), A303815 (k=29), A316729 (k=30).
Cf. A051866, A211014.

[(3*n*(n+1)+(2*n+1)*(-1)^n-1)/2: n in [0..60]]; // Vincenzo Librandi, Sep 30 2011

A195818:=func; [0] cat [A195818(n*m): m in [1,-1], n in [1..25]];

a:= n-> (m-> m*(6*m-5))(ceil(-(n+1)/2)*(-1)^n):
seq(a(n), n=0..46);  # Alois P. Heinz, Jun 08 2021

LinearRecurrence[{1,2,-2,-1,1},{0,1,11,14,34},50] (* Harvey P. Dale, Mar 13 2018 *)

Vec(-x*(x^2+10*x+1)/((x-1)^3*(x+1)^2) + O(x^100)) \\ Colin Barker, Sep 15 2013

a(n) = (3*n*(n+1) + (2*n+1)*(-1)^n - 1)/2. - Vincenzo Librandi, Sep 30 2011
G.f.: -x*(x^2+10*x+1) / ((x-1)^3*(x+1)^2). - Colin Barker, Sep 15 2013
Sum_{n>=1} 1/a(n) = 6/25 + sqrt(3)*Pi/5. - Vaclav Kotesovec, Oct 05 2016
E.g.f.: (x*(3*x + 4)*cosh(x) + (3*x^2 + 8*x - 2)*sinh(x))/2. - Stefano Spezia, Jun 08 2021
Sum_{n>=1} (-1)^(n+1)/a(n) = (5*log(432)-6)/25. - Amiram Eldar, Feb 28 2022

A195825 Square array T(n,k) read by antidiagonals, n>=0, k>=1, which arises from a generalization of Euler's Pentagonal Number Theorem.

Original entry on oeis.org

1, 1, 1, 2, 1, 1, 3, 1, 1, 1, 5, 2, 1, 1, 1, 7, 3, 1, 1, 1, 1, 11, 4, 2, 1, 1, 1, 1, 15, 5, 3, 1, 1, 1, 1, 1, 22, 7, 4, 2, 1, 1, 1, 1, 1, 30, 10, 4, 3, 1, 1, 1, 1, 1, 1, 42, 13, 5, 4, 2, 1, 1, 1, 1, 1, 1, 56, 16, 7, 4, 3, 1, 1, 1, 1, 1, 1, 1, 77, 21, 10, 4

Offset: 0

Omar E. Pol, Sep 24 2011

In the infinite square array the column k is related to the generalized m-gonal numbers, where m = k+4. For example: the first column is related to the generalized pentagonal numbers A001318. The second column is related to the generalized hexagonal numbers A000217 (note that A000217 is also the entry for the triangular numbers). And so on ... (see the program in which A195152 is a table of generalized m-gonal numbers).
In the following table Euler's Pentagonal Number Theorem is represented by the entries A001318, A195310, A175003 and A000041 (see below the first row of the table):
========================================================
.                                          Column k of
.                                          this square
.       Generalized   Triangle  Triangle   array A195825
k    m    m-gonal       "A"       "B"      [row sums of
.         numbers                          triangle "B"
.                                          with a(0)=1]
========================================================
1    5    A001318     A195310   A175003      A000041
2    6    A000217     A195826   A195836      A006950
3    7    A085787     A195827   A195837      A036820
4    8    A001082     A195828   A195838      A195848
5    9    A118277     A195829   A195839      A195849
6   10    A074377     A195830   A195840      A195850
7   11    A195160     A195831   A195841      A195851
8   12    A195162     A195832   A195842      A195852
9   13    A195313     A195833   A195843      A196933
10  14    A195818     A210944   A210954      A210964
...
It appears that column 2 of the square array is A006950.
It appears that column 3 of the square array is A036820.
Conjecture: if k is odd then column k contains (k+1)/2 plateaus whose levels are the first (k+1)/2 terms of A210843 and whose lengths are k+1, k-1, k-3, k-5, ... 2. Otherwise, if k is even then column k contains k/2 plateaus whose levels are the first k/2 terms of A210843 and whose lengths are k+1, k-1, k-3, k-5, ... 3. The sequence A210843 gives the levels of the plateaus of column k, when k -> infinity. For the visualization of the plateaus see the graph of a column, for example see the graph of A210964. - Omar E. Pol, Jun 21 2012

			Array begins:
    1,  1,  1,  1,  1,  1,  1,  1,  1,  1, ...
    1,  1,  1,  1,  1,  1,  1,  1,  1,  1, ...
    2,  1,  1,  1,  1,  1,  1,  1,  1,  1, ...
    3,  2,  1,  1,  1,  1,  1,  1,  1,  1, ...
    5,  3,  2,  1,  1,  1,  1,  1,  1,  1, ...
    7,  4,  3,  2,  1,  1,  1,  1,  1,  1, ...
   11,  5,  4,  3,  2,  1,  1,  1,  1,  1, ...
   15,  7,  4,  4,  3,  2,  1,  1,  1,  1, ...
   22, 10,  5,  4,  4,  3,  2,  1,  1,  1, ...
   30, 13,  7,  4,  4,  4,  3,  2,  1,  1, ...
   42, 16, 10,  5,  4,  4,  4,  3,  2,  1, ...
   56, 21, 12,  7,  4,  4,  4,  4,  3,  2, ...
   77, 28, 14, 10,  5,  4,  4,  4,  4,  3, ...
  101, 35, 16, 12,  7,  4,  4,  4,  4,  4, ...
  135, 43, 21, 13, 10,  5,  4,  4,  4,  4, ...
  176, 55, 27, 14, 12,  7,  4,  4,  4,  4, ...
  ...
Column 1 is A000041 which starts: [1, 1], 2, 3, 5, 7, 11, ... The column contains only one plateau: [1, 1] which has level 1 and length 2.
Column 3 is A036820 which starts: [1, 1, 1, 1], 2, 3, [4, 4], 5, 7, 10, ... The column contains two plateaus: [1, 1, 1, 1], [4, 4], which have levels 1, 4 and lengths 4, 2.
Column 6 is A195850 which starts: [1, 1, 1, 1, 1, 1, 1], 2, 3, [4, 4, 4, 4, 4], 5, 7, 10, 12, [13, 13, 13], 14, 16, 21, ... The column contains three plateaus: [1, 1, 1, 1, 1, 1, 1], [4, 4, 4, 4, 4], [13, 13, 13], which have levels 1, 4, 13 and lengths 7, 5, 3.

Leonhard Euler, De mirabilibus proprietatibus numerorum pentagonalium
Leonhard Euler, On the remarkable properties of the pentagonal numbers, arXiv:math/0505373 [math.HO], 2005.
Eric Weisstein's World of Mathematics, Pentagonal Number Theorem
Wikipedia, Pentagonal number theorem

Columns (1-10): A000041, A006950, A036820, A195848, A195849, A195850, A195851, A195852, A196933, A210964.
For another version see A211970.
Cf. A057077, A195152, A210843.

Column k is asymptotic to exp(Pi*sqrt(2*n/(k+2))) / (8*sin(Pi/(k+2))*n). - Vaclav Kotesovec, Aug 14 2017

A218864 Numbers of the form 9k^2 + 8k, k an integer.

Original entry on oeis.org

0, 1, 17, 20, 52, 57, 105, 112, 176, 185, 265, 276, 372, 385, 497, 512, 640, 657, 801, 820, 980, 1001, 1177, 1200, 1392, 1417, 1625, 1652, 1876, 1905, 2145, 2176, 2432, 2465, 2737, 2772, 3060, 3097, 3401, 3440, 3760, 3801, 4137, 4180, 4532, 4577, 4945, 4992

Offset: 1

Jason Kimberley, Nov 08 2012

Numbers m such that 9*m + 16 is a square. - Vincenzo Librandi, Apr 07 2013
Equivalently, integers of the form h*(h + 8)/9 (nonnegative values of h are listed in A090570). - Bruno Berselli, Jul 15 2016
Generalized 20-gonal (or icosagonal) numbers: r*(9*r - 8) with r = 0, +1, -1, +2, -2, +3, -3, ... - Omar E. Pol, Jun 06 2018
Partial sums of A317316. - Omar E. Pol, Jul 28 2018
Exponents in expansion of Product_{n >= 1} (1 + x^(18*n-17))*(1 + x^(18*n-1))*(1 - x^(18*n)) = 1 + x + x^17 + x^20 + x^52 + .... - Peter Bala, Dec 10 2020

Jason Kimberley, Table of n, a(n) for n = 1..2000
S. Cooper and M. D. Hirschhorn, Results of Hurwitz type for three squares. Discrete Math., Vol. 274, No. 1-3 (2004), pp. 9-24. See C(q).
Index entries for linear recurrences with constant coefficients, signature (1,2,-2,-1,1).

Characteristic function is A205987.
Numbers of the form 9*m^2+k*m, for integer n: A016766 (k=0), A132355 (k=2), A185039 (k=4), A057780 (k=6), this sequence (k=8).
Cf. A074377 (numbers m such that 16*m+9 is a square).
Cf. A317316.
For similar sequences of numbers m such that 9*m+i is a square, see list in A266956.
Cf. sequences of the form m*(m+i)/(i+1) listed in A274978. [Bruno Berselli, Jul 25 2016]
Sequences of generalized k-gonal numbers: A001318 (k=5), A000217 (k=6), A085787 (k=7), A001082 (k=8), A118277 (k=9), A074377 (k=10), A195160 (k=11), A195162 (k=12), A195313 (k=13), A195818 (k=14), A277082 (k=15), A274978 (k=16), A303305 (k=17), A274979 (k=18), A303813 (k=19), this sequence (k=20), A303298 (k=21), A303299 (k=22), A303303 (k=23), A303814 (k=24), A303304 (k=25), A316724 (k=26), A316725 (k=27), A303812 (k=28), A303815 (k=29), A316729 (k=30).

a:=func; [0]cat[a(n*m): m in [-1,1], n in [1..20]];

Array[(18 # (# - 1) - 7 (-1)^#*(2 # - 1) - 7)/8 &, 48] (* or *)
CoefficientList[Series[x (1 + 16 x + x^2)/((1 + x)^2*(1 - x)^3), {x, 0, 47}], x] (* Michael De Vlieger, Jun 06 2018 *)

a(n) = (18*n*(n - 1) - 7*(-1)^n*(2*n - 1) - 7)/8. - Bruno Berselli, Nov 13 2012
G.f.: x*(1 + 16*x + x^2)/((1 + x)^2*(1 - x)^3). - Bruno Berselli, Nov 14 2012
Sum_{n>=2} 1/a(n) = (9 + 8*Pi*cot(Pi/9))/64. - Amiram Eldar, Feb 28 2022

A080512 a(n) = n if n is odd, a(n) = 3*n/2 if n is even.

Original entry on oeis.org

1, 3, 3, 6, 5, 9, 7, 12, 9, 15, 11, 18, 13, 21, 15, 24, 17, 27, 19, 30, 21, 33, 23, 36, 25, 39, 27, 42, 29, 45, 31, 48, 33, 51, 35, 54, 37, 57, 39, 60, 41, 63, 43, 66, 45, 69, 47, 72, 49, 75, 51, 78, 53, 81, 55, 84, 57, 87, 59, 90, 61, 93, 63, 96, 65, 99, 67, 102

Offset: 1

Amarnath Murthy, Mar 20 2003

First differences of the generalized heptagonal numbers A085787. - Omar E. Pol, Sep 10 2011
Last term in n-th row of A080511.
Also A005408 and positive terms of A008585 interleaved. - Omar E. Pol, May 28 2012
a(n) is also the length of the n-th line segment of the rectangular spiral whose vertices are the generalized heptagonal numbers. - Omar E. Pol, Jul 27 2018

Vincenzo Librandi, Table of n, a(n) for n = 1..10000
Index entries for linear recurrences with constant coefficients, signature (0,2,0,-1).

Cf. A080511, A008619, A126988.

Cf. A005408, A008585, A064455, A085787, A126246

import Data.List (transpose)
a080512 n = if m == 0 then 3 * n' else n  where (n', m) = divMod n 2
a080512_list = concat $ transpose [[1, 3 ..], [3, 6 ..]]
-- Reinhard Zumkeller, Apr 06 2015

[n*(5+(-1)^n)/4: n in [1..60]]; // Vincenzo Librandi, Sep 11 2011

Table[If[EvenQ[n],3n/2,n],{n,68}] (* Jayanta Basu, May 20 2013 *)

a(n) = n if n is odd, a(n) = 3*n/2 if n is even.
a(n)*a(n+3) = -3 + a(n+1)*a(n+2).
From Paul Barry, Sep 04 2003: (Start)
G.f.: (1+3*x+x^2)/((1-x^2)^2);
a(n) = n*(5 + (-1)^n)/4. (End)
Multiplicative with a(2^e) = 3*2^(e-1), a(p^e) = p^e otherwise. - Christian G. Bower, May 17 2005
Equals A126988 * (1, 1, 0, 0, 0, ...) - Gary W. Adamson, Apr 17 2007
Dirichlet g.f.: zeta(s-1) * (1 + 1/2^s). - Amiram Eldar, Oct 25 2023
Sum_{d divides n} mu(n/d)*a(d) = A126246(n), where mu(n) = A008683(n) is the Möbius function. - Peter Bala, Dec 31 2023

cp's OEIS Frontend

A074377 Generalized 10-gonal numbers: m*(4*m - 3) for m = 0, +- 1, +- 2, +- 3, ...

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Magma

Mathematica

PARI

PARI

Python

Formula

Extensions

A005901 Number of points on surface of cuboctahedron (or icosahedron): a(0) = 1; for n > 0, a(n) = 10n^2 + 2. Also coordination sequence for f.c.c. or A_3 or D_3 lattice.

Views

Author

Keywords

Comments

References

Links

Crossrefs

Programs

Magma

Mathematica

PARI

SageMath

Formula

A118277 Generalized 9-gonal (or enneagonal) numbers: m*(7*m - 5)/2 with m = 0, 1, -1, 2, -2, 3, -3, ...

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Magma

Mathematica

PARI

Formula

Extensions

A195162 Generalized 12-gonal numbers: k*(5*k-4) for k = 0, +-1, +-2, ...

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

GAP

Magma

Mathematica

PARI

Sage

Formula

A195160 Generalized 11-gonal (or hendecagonal) numbers: m*(9*m - 7)/2 with m = 0, 1, -1, 2, -2, 3, -3, ...

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Magma

Mathematica

PARI

Formula

A195313 Generalized 13-gonal numbers: m*(11*m-9)/2 with m = 0, 1, -1, 2, -2, 3, -3, ...

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Magma

Magma

Maple

A074377 Generalized 10-gonal numbers: m(4m - 3) for m = 0, +- 1, +- 2, +- 3, ...

A118277 Generalized 9-gonal (or enneagonal) numbers: m(7m - 5)/2 with m = 0, 1, -1, 2, -2, 3, -3, ...

A195162 Generalized 12-gonal numbers: k(5k-4) for k = 0, +-1, +-2, ...

A195160 Generalized 11-gonal (or hendecagonal) numbers: m(9m - 7)/2 with m = 0, 1, -1, 2, -2, 3, -3, ...

A195313 Generalized 13-gonal numbers: m(11m-9)/2 with m = 0, 1, -1, 2, -2, 3, -3, ...

A195818 Generalized 14-gonal numbers: m(6m-5), m = 0,+1,-1,+2,-2,+3,-3,...

A218864 Numbers of the form 9k^2 + 8k, k an integer.