Displaying 1-10 of 34 results found.
a(n) = 6*n^2 + 2 for n > 0, a(0)=1.
(Formerly M4497)
+0
580
1, 8, 26, 56, 98, 152, 218, 296, 386, 488, 602, 728, 866, 1016, 1178, 1352, 1538, 1736, 1946, 2168, 2402, 2648, 2906, 3176, 3458, 3752, 4058, 4376, 4706, 5048, 5402, 5768, 6146, 6536, 6938, 7352, 7778, 8216, 8666, 9128, 9602, 10088, 10586
COMMENTS
Number of points on surface of 3-dimensional cube in which each face has a square grid of dots drawn on it (with n+1 points along each edge, including the corners).
Coordination sequence for b.c.c. lattice.
Also coordination sequence for 3D uniform tiling with tile an equilateral triangular prism. - N. J. A. Sloane, Feb 06 2018
Binomial transform of [1, 7, 11, 1, -1, 1, -1, 1, ...]. - Gary W. Adamson, Oct 22 2007
Apart from the first term, numbers of the form (r^2+2*s^2)*n^2+2 = (r*n)^2+(s*n-1)^2+(s*n+1)^2: in this case is r=2, s=1. After 8, all terms are in A000408. - Bruno Berselli, Feb 07 2012
For n > 0, the sequence of last digits (i.e., a(n) mod 10) is (8, 6, 6, 8, 2) repeating forever. - M. F. Hasler, Apr 05 2016
Number of cubes of edge length 1 required to make a hollow cube of edge length n+1. - Peter M. Chema, Apr 01 2017
REFERENCES
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 (194) hP4
B. Grünbaum, Uniform tilings of 3-space, Geombinatorics, 4 (1994), 49-56. See tiling #11.
R. W. Marks and R. B. Fuller, The Dymaxion World of Buckminster Fuller. Anchor, NY, 1973, p. 46.
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
FORMULA
a(0) = 1, a(n) = (n+1)^3 - (n-1)^3. - Ilya Nikulshin (ilyanik(AT)gmail.com), Aug 11 2009
a(0)=1, a(1)=8, a(2)=26, a(3)=56; for n>3, a(n) = 3*a(n-1)-3*a(n-2)+a(n-3). - Harvey P. Dale, Oct 25 2011
E.g.f.: 2*(1 + 3*x + 3*x^2)*exp(x) - 1. - G. C. Greubel, Dec 01 2017
Sum_{n>=0} 1/a(n) = 3/4+ Pi*sqrt(3)*coth(Pi/sqrt 3)/12 = 1.2282133.. - R. J. Mathar, Apr 27 2024
EXAMPLE
For n = 1 we get the 8 corners of the cube; for n = 2 each face has 9 points, for a total of 8 + 12 + 6 = 26.
MAPLE
A005897:=-(z+1)*(z**2+4*z+1)/(z-1)**3; # conjectured (correctly) by Simon Plouffe in his 1992 dissertation
MATHEMATICA
Join[{1}, 6Range[50]^2+2] (* or *) Join[{1}, LinearRecurrence[{3, -3, 1}, {8, 26, 56}, 50]] (* Harvey P. Dale, Oct 25 2011 *)
PROG
(PARI) x='x+O('x^30); Vec(serlaplace(2*(1 + 3*x + 3*x^2)*exp(x) - 1)) \\ G. C. Greubel, Dec 01 2017
(Haskell) a005897 n = if n == 0 then 1 else 6 * n ^ 2 + 2 -- Reinhard Zumkeller, Apr 27 2014
CROSSREFS
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.
Number of points on surface of tetrahedron; coordination sequence for sodalite net (equals 2*n^2+2 for n > 0).
(Formerly M3380)
+0
84
1, 4, 10, 20, 34, 52, 74, 100, 130, 164, 202, 244, 290, 340, 394, 452, 514, 580, 650, 724, 802, 884, 970, 1060, 1154, 1252, 1354, 1460, 1570, 1684, 1802, 1924, 2050, 2180, 2314, 2452, 2594, 2740, 2890, 3044, 3202, 3364, 3530, 3700, 3874, 4052, 4234
COMMENTS
Number of n-matchings of the wheel graph W_{2n} (n > 0). Example: a(2)=10 because in the wheel W_4 (rectangle ABCD and spokes OA,OB,OC,OD) we have the 2-matchings: (AB, OC), (AB, OD), (BC, OA), (BC,OD), (CD,OA), (CD,OB), (DA,OB), (DA,OC), (AB,CD) and (BC,DA). - Emeric Deutsch, Dec 25 2004
For n > 0 a(n) is the difference of two tetrahedral (or pyramidal) numbers: binomial(n+3, 3) = (n+1)(n+2)(n+3)/6. a(n) = A000292(n+1) - A000292(n-3) = (n+1)(n+2)(n+3)/6 - (n-3)(n-2)(n-1)/6. - Alexander Adamchuk, May 20 2006; updated by Peter Munn, Aug 25 2017 due to changed offset in A000292
Equals binomial transform of [1, 3, 3, 1, -1, 1, -1, 1, -1, 1, ...]. Binomial transform of A005893 = nonzero terms of A053545: (1, 5, 19, 63, 191, ...). - Gary W. Adamson, Apr 28 2008
Disregarding the terms < 10, the sums of four consecutive triangular numbers ( A000217). - Rick L. Shepherd, Sep 30 2009
Use a set of n concentric circles where n >= 0 to divide the plane. a(n) is the maximal number of regions after the 2nd division. - Frank M Jackson, Sep 07 2011
Euler transform of length 4 sequence [4, 0, 0, -1]. - Michael Somos, May 14 2014
Also, growth series for affine Coxeter group (or affine Weyl group) A_3 or D_3. - N. J. A. Sloane, Jan 11 2016
For n > 2 the generalized Pell's equation x^2 - 2*(a(n) - 2)y^2 = (a(n) - 4)^2 has a finite number of positive integer solutions. - Muniru A Asiru, Apr 19 2016
REFERENCES
N. Bourbaki, Groupes et Algèbres de Lie, Chap. 4, 5 and 6, Hermann, Paris, 1968. See Chap. VI, Section 4, Problem 10b, page 231, W_a(t).
H. S. M. Coxeter, "Polyhedral numbers," in R. S. Cohen et al., editors, For Dirk Struik. Reidel, Dordrecht, 1974, pp. 25-35.
B. Grünbaum, Uniform tilings of 3-space, Geombinatorics, 4 (1994), 49-56. See tiling #28.
R. W. Marks and R. B. Fuller, The Dymaxion World of Buckminster Fuller. Anchor, NY, 1973, p. 46.
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
LINKS
J. H. Conway and N. J. A. Sloane, Low-Dimensional Lattices VII: Coordination Sequences, Proc. Royal Soc. London, A453 (1997), 2369-2389 ( pdf).
Reticular Chemistry Structure Resource, sod.
FORMULA
G.f.: (1 - x^4)/(1-x)^4.
a(n) = binomial(n+3, 3) - binomial(n-1, 3) for n >= 1. - Mitch Harris, Jan 08 2008
a(n) = (n+1)^2 + (n-1)^2. - Benjamin Abramowitz, Apr 14 2009
a(0)=1, a(1)=4, a(2)=10, a(3)=20, a(n) = 3*a(n-1) - 3*a(n-2) + a(n-3). - Harvey P. Dale, Feb 26 2012
For n >= 2: a(n) = a(n-1) + 4*n - 2. - Bob Selcoe, Mar 22 2016
Sum_{n>=0} 1/a(n) = (coth(Pi)*Pi + 3)/4.
Sum_{n>=0} (-1)^n/a(n) = (cosech(Pi)*Pi + 3)/4. (End)
Empirical: Integral_{u=-oo..+oo} sigmoid(u)*log(sigmoid(n * u)) du = -Pi^2*a(n) / (24*n), where sigmoid(x) = 1/(1+exp(-x)). Also works for non-integer n>0. - Carlo Wood, Dec 04 2023
Let P(k,n) be the n-th k-gonal number. Then P(a(k),n) = (k*n-k+1)^2 + (k-1)^2*(n-1). - Charlie Marion, May 15 2024
EXAMPLE
G.f. = 1 + 4*x + 10*x^2 + 20*x^3 + 34*x^4 + 52*x^5 + 74*x^6 + 100*x^7 + ...
MATHEMATICA
Join[{1}, LinearRecurrence[{3, -3, 1}, {4, 10, 20}, 50]] (* Harvey P. Dale, Feb 26 2012 *)
a[ n_] := SeriesCoefficient[ (1 - x^4) / (1 - x)^4, {x, 0, Abs@n}]; (* Michael Somos, May 14 2014 *)
a[ n_] := 2 n^2 + 2 - Boole[n == 0]; (* Michael Somos, May 14 2014 *)
CROSSREFS
Cf. similar sequences listed in A255843.
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.
Number of points on surface of octahedron; also coordination sequence for cubic lattice: a(0) = 1; for n > 0, a(n) = 4n^2 + 2.
(Formerly M4115)
+0
75
1, 6, 18, 38, 66, 102, 146, 198, 258, 326, 402, 486, 578, 678, 786, 902, 1026, 1158, 1298, 1446, 1602, 1766, 1938, 2118, 2306, 2502, 2706, 2918, 3138, 3366, 3602, 3846, 4098, 4358, 4626, 4902, 5186, 5478, 5778, 6086, 6402, 6726, 7058, 7398, 7746, 8102, 8466
COMMENTS
Also, the number of regions the plane can be cut into by two overlapping concave (2n)-gons. - Joshua Zucker, Nov 05 2002
If X is an n-set and Y_i (i=1,2,3) are mutually disjoint 2-subsets of X then a(n-5) is equal to the number of 5-subsets of X intersecting each Y_i (i=1,2,3). - Milan Janjic, Aug 26 2007
Also the least number of unit cubes required, at the n-th iteration, to surround a 3D solid built from unit cubes, in order to hide all its visible faces, starting with a unit cube. - R. J. Cano, Sep 29 2015
Also, coordination sequence for "tfs" 3D uniform tiling. - N. J. A. Sloane, Feb 10 2018
Also, the number of n-th order specular reflections arriving at a receiver point from an emitter point inside a cuboid with reflective faces. - Michael Schutte, Sep 18 2018
REFERENCES
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) cF8
B. Grünbaum, Uniform tilings of 3-space, Geombinatorics, 4 (1994), 49-56. See tilings #16 and #22.
R. W. Marks and R. B. Fuller, The Dymaxion World of Buckminster Fuller. Anchor, NY, 1973, p. 46.
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
LINKS
J. H. Conway and N. J. A. Sloane, Low-Dimensional Lattices VII: Coordination Sequences, Proc. Royal Soc. London, A453 (1997), 2369-2389 ( pdf).
FORMULA
Binomial transform of [1, 5, 7, 1, -1, 1, -1, 1, ...]. - Gary W. Adamson, Nov 02 2007
a(n) = 3*a(n-1) - 3*a(n-2) + a(n-3), with a(0)=1, a(1)=6, a(2)=18, a(3)=38. - Harvey P. Dale, Nov 08 2011
Recurrence: n*a(n) = (n-2)*a(n-2) + 6*a(n-1), a(0)=1, a(1)=6. - Fung Lam, Apr 15 2014
a(n) = 2*d*Hypergeometric2F1(1-d, 1-n, 2, 2) where d=3, n>0. - Shel Kaphan, Feb 16 2023
Sum_{n>=0} 1/a(n) = 3/4 + Pi *sqrt(2)*coth( Pi/sqrt 2)/8 = 1.31858... - R. J. Mathar, Apr 27 2024
MATHEMATICA
Join[{1}, 4Range[40]^2+2] (* or *) Join[{1}, LinearRecurrence[{3, -3, 1}, {6, 18, 38}, 40]] (* Harvey P. Dale, Nov 08 2011 *)
PROG
(PARI) Vec(((1+x)/(1-x))^3 + O(x^100)) \\ Altug Alkan, Oct 26 2015
CROSSREFS
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.
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.
(Formerly M4834)
+0
64
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
COMMENTS
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
REFERENCES
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).
LINKS
J. H. Conway and N. J. A. Sloane, Low-Dimensional Lattices VII: Coordination Sequences, Proc. Royal Soc. London, A453 (1997), 2369-2389 ( pdf).
FORMULA
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) = 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
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
MATHEMATICA
Join[{1}, 10*Range[40]^2+2] (* or *) Join[{1}, LinearRecurrence[{3, -3, 1}, {12, 42, 92}, 40]] (* Harvey P. Dale, May 28 2014 *)
PROG
(PARI) a(n)=if(n<0, 0, 10*n^2+1+(n>0))
(Magma) [n eq 0 select 1 else 2*(5*n^2+1): n in [0..55]]; // G. C. Greubel, May 25 2023
(SageMath) [2*(5*n^2 + 1)-int(n==0) for n in range(56)] # G. C. Greubel, May 25 2023
CROSSREFS
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.
a(0) = 1, a(n) = 5*n^2 + 2 for n>0.
+0
52
1, 7, 22, 47, 82, 127, 182, 247, 322, 407, 502, 607, 722, 847, 982, 1127, 1282, 1447, 1622, 1807, 2002, 2207, 2422, 2647, 2882, 3127, 3382, 3647, 3922, 4207, 4502, 4807, 5122, 5447, 5782, 6127, 6482, 6847, 7222, 7607, 8002, 8407, 8822, 9247, 9682, 10127, 10582
COMMENTS
Coordination sequence for 3D uniform tiling formed by stacking parallel layers of the 3^3.4^2 2D tiling (cf. A008706). - N. J. A. Sloane, Feb 07 2018
REFERENCES
B. Grünbaum, Uniform tilings of 3-space, Geombinatorics, 4 (1994), 49-56. See tiling #13.
FORMULA
Sum_{n>=0} 1/a(n) = 3/4+sqrt(10)/20*Pi*coth( Pi/5 *sqrt 10) = 1.2657655... - R. J. Mathar, May 07 2024
CROSSREFS
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.
Coordination sequence for body-centered tetragonal lattice.
+0
34
1, 10, 34, 74, 130, 202, 290, 394, 514, 650, 802, 970, 1154, 1354, 1570, 1802, 2050, 2314, 2594, 2890, 3202, 3530, 3874, 4234, 4610, 5002, 5410, 5834, 6274, 6730, 7202, 7690, 8194, 8714, 9250, 9802, 10370, 10954, 11554, 12170, 12802, 13450, 14114, 14794, 15490, 16202, 16930, 17674
COMMENTS
Also sequence found by reading the segment (1, 10) together with the line from 10, in the direction 10, 34, ..., in the square spiral whose vertices are the generalized hexagonal numbers A000217. - Omar E. Pol, Nov 02 2012
FORMULA
a(0) = 1; a(n) = 8*n^2+2 for n>0.
a(n) = (2n+1)^2 + (2n-1)^2 for n>0.
Binomial transform of [1, 9, 15, 1, -1, 1, -1, 1, ...]. (End)
a(n) = 3*a(n-1) - 3*a(n-2) + a(n-3) for n>3.
G.f.: (1+x)*(1+6*x+x^2)/(1-x)^3. (End)
Sum_{n>=0} 1/a(n) = 3/4+1/8*Pi*coth(Pi/2) = 1.178172.... - R. J. Mathar, May 07 2024
MAPLE
1, seq(8*k^2+2, k=1..50);
MATHEMATICA
a[0]:= 1; a[n_]:= 8n^2 +2; Table[a[n], {n, 0, 50}] (* Alonso del Arte, Sep 06 2011 *)
LinearRecurrence[{3, -3, 1}, {1, 10, 34, 74}, 50] (* Harvey P. Dale, Feb 13 2022 *)
PROG
(PARI) vector(51, n, if(n==1, 1, 2*(1+(2*n-2)^2)) ) \\ G. C. Greubel, Nov 09 2019
(Magma) [1] cat [2*(1 + 4*n^2): n in [1..50]]; // G. C. Greubel, Nov 09 2019
(Sage) [1]+[2*(1+4*n^2) for n in (1..40)] # G. C. Greubel, Nov 09 2019
(GAP) Concatenation([1], List([1..40], n-> 2*(1+4*n^2) )); # G. C. Greubel, Nov 09 2019
CROSSREFS
Apart from leading term, same as A108100.
a(0) = 1, a(n) = n^2 + 2 for n > 0.
+0
18
1, 3, 6, 11, 18, 27, 38, 51, 66, 83, 102, 123, 146, 171, 198, 227, 258, 291, 326, 363, 402, 443, 486, 531, 578, 627, 678, 731, 786, 843, 902, 963, 1026, 1091, 1158, 1227, 1298, 1371, 1446, 1523, 1602, 1683, 1766, 1851, 1938, 2027, 2118, 2211, 2306, 2403
COMMENTS
With an offset of 3, beginning with 6 (deleting first two terms) n*(n+a(n)) + 1 is a cube = (n+1)^3: 1*(1+6) + 1 = 8, 2*(2+11) + 1 = 27, etc. - Amarnath Murthy and Meenakshi Srikanth (menakan_s(AT)yahoo.com), May 03 2003
For n >= 2, a(n) is the maximum element in the continued fraction for Sum_{k>=1} 1/n^(2^k) (for n=2 see A006464). - Benoit Cloitre, Jun 12 2007
Equals binomial transform of [1, 2, 1, 1, -1, 1, -1, 1, ...]. - Gary W. Adamson, Apr 23 2008
Minimum Wiener index of 3-degenerate graphs with n+2 vertices. A maximal 3-degenerate graph can be constructed from a 3-clique by iteratively adding a new 3-leaf (vertex of degree 3) adjacent to three existing vertices. The extremal graphs are maximal 3-degenerate graphs with diameter at most 2. - Allan Bickle, Oct 14 2022
a(n-1) is the number of unit triangles enclosed by the triangular spiral drawn on a isometric grid of which the n-th side has length n. The picture in the link shows how the spiral is constructed. - Bob Andriesse, Feb 14 2023
FORMULA
Euler transform of length 6 sequence [ 3, 0, 1, 0, 0, -1]. - Michael Somos, Aug 11 2009
G.f.: (1 + x^3) / (1 - x)^3.
a(n) = a(-n) for all n in Z. (End)
a(n) = (2*n/(n+1)!)*Sum_{j=0..n} (-1)^(n-j)*binomial(n,j)*(j+1/n)^(n+1), n > 0, a(0)=1. - Vladimir Kruchinin, Jun 03 2013
Sum_{n>=0} 1/a(n) = 3/4+1/4*sqrt(2)*Pi*coth(Pi*sqrt 2)= 1.8610281... - R. J. Mathar, May 07 2024
EXAMPLE
G.f. = 1 + 3*x + 6*x^2 + 11*x^3 + 18*x^4 + 27*x^5 + 38*x^6 + 51*x^7 + 66*x^8 + ...
MATHEMATICA
a[1] = a[2] = 1; a[n_] := a[n] = 2 + a[n - a[n - 1]]; b = Table[0, {100}]; Do[c = (a[n] + 1)/2; If[c < 101 && b[[c]] == 0, b[[c]] = n], {n, 1, 10^4}]; b
a[ n_] := n^2 + 2 - Boole[n == 0]; (* Michael Somos, May 05 2015 *)
PROG
(PARI) {a(n) = n^2 + 2 - (n==0)}; /* Michael Somos, Aug 11 2009 */
(Maxima)
a(n):=if n=0 then 1 else 2*n*sum((-1)^(n-j)*binomial(n, j)*(j+1/n)^(n+1), j, 0, n)/(n+1)!; \\ Vladimir Kruchinin, Jun 03 2013
CROSSREFS
Cf. A002061 (minimum Wiener index of 2-degenerate graphs).
Number of points on surface of square pyramid: 3*n^2 + 2 (n>0).
(Formerly M3843)
+0
17
1, 5, 14, 29, 50, 77, 110, 149, 194, 245, 302, 365, 434, 509, 590, 677, 770, 869, 974, 1085, 1202, 1325, 1454, 1589, 1730, 1877, 2030, 2189, 2354, 2525, 2702, 2885, 3074, 3269, 3470, 3677, 3890, 4109, 4334, 4565, 4802, 5045, 5294, 5549, 5810, 6077, 6350, 6629
COMMENTS
Also coordination sequence of the 5-connected (or bnn) net = hexagonal net X integers.
Also (except for initial term) numbers of the form 3n^2+2 that are not squares. All numbers 3n^2+2 are == 2 (mod 3), and hence not squares. - Cino Hilliard, Mar 01 2003, modified by Franklin T. Adams-Watters, Jun 27 2014
If a 2-set Y and a 3-set Z are disjoint subsets of an n-set X then a(n-4) is the number of 4-subsets of X intersecting both Y and Z. - Milan Janjic, Sep 08 2007
Sums of three consecutive squares: (n - 2)^2 + (n - 1)^2 + n^2 for n > 1. - Keith Tyler, Aug 10 2010
REFERENCES
H. S. M. Coxeter, Polyhedral numbers, in R. S. Cohen et al., editors, For Dirk Struik. Reidel, Dordrecht, 1974, pp. 25-35.
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
A. F. Wells, Three-Dimensional Nets and Polyhedra, Fig. 15.1 (e).
FORMULA
G.f.: (1 - x^2)*(1 - x^3)/(1 - x)^5 = (1+x)*(1+x+x^2)/(1-x)^3.
Euler transform of length 3 sequence [ 5, -1, -1]. - Michael Somos, Aug 07 2014
a(n) = 3*a(n-1)-3*a(n-2)+a(n-3) for n>3. - Colin Barker, Aug 07 2014
Sum_{n>=0} 1/a(n) = coth(sqrt(2/3)*Pi)*Pi/(2*sqrt(6)) + 3/4.
Sum_{n>=0} (-1)^n/a(n) = cosech(sqrt(2/3)*Pi)*Pi/(2*sqrt(6)) + 3/4. (End)
EXAMPLE
G.f. = 1 + 5*x + 14*x^2 + 29*x^3 + 50*x^4 + 77*x^5 + 110*x^6 + 149*x^7 + ...
MATHEMATICA
Join[{1}, Table[Plus@@(Range[n, n + 2]^2), {n, 0, 49}]] (* Alonso del Arte, Oct 27 2012 *)
CoefficientList[Series[(1 - x^2) (1 - x^3)/(1 - x)^5, {x, 0, 40}], x] (* Vincenzo Librandi, Aug 07 2014 *)
LinearRecurrence[{3, -3, 1}, {1, 5, 14, 29}, 50] (* Harvey P. Dale, Dec 12 2015 *)
PROG
(PARI) sq3nsqp2(n) = { for(x=1, n, y = 3*x*x+2; print1(y, ", ") ) }
(PARI) {a(n) = 3*n^2 + 2 - (n==0)}; /* Michael Somos, Aug 07 2014 */
Coordination sequence for C_3 lattice: a(n) = 16*n^2 + 2 (n>0), a(0)=1.
+0
14
1, 18, 66, 146, 258, 402, 578, 786, 1026, 1298, 1602, 1938, 2306, 2706, 3138, 3602, 4098, 4626, 5186, 5778, 6402, 7058, 7746, 8466, 9218, 10002, 10818, 11666, 12546, 13458, 14402, 15378, 16386, 17426, 18498, 19602, 20738, 21906, 23106, 24338, 25602, 26898
COMMENTS
If Y_i (i=1,2,3) are 2-blocks of a (2n+1)-set X then a(n-1) is the number of 5-subsets of X intersecting each Y_i (i=1,2,3). - Milan Janjic, Oct 28 2007
Also sequence found by reading the segment (1, 18) together with the line from 18, in the direction 18, 66, ..., in the square spiral whose vertices are the generalized decagonal numbers A074377. - Omar E. Pol, Nov 02 2012
FORMULA
a(0)=1, a(n) = 16*n^2 + 2, n >= 1.
G.f.: (1+x)*(1+14*x+x^2)/(1-x)^3.
G.f. for coordination sequence of C_n lattice: (1/(1-z)^n)*Sum_{i=0..n} binomial(2*n, 2*i)*z^i.
a(n) = 3*a(n-1) - 3*a(n-2) + a(n-3); a(0)=1, a(1)=18, a(2)=66, a(3)=146. - Harvey P. Dale, Oct 15 2012
G.f. for sequence with interpolated zeros: cosh(6*arctanh(x)) = (1/2)*( ((1 - x)/(1 + x))^3 + ((1 + x)/(1 - x))^3) = 1 + 18*x^2 + 66*x^4 + 146*x^6 + .... More generally, cosh(2*n*arctanh(sqrt(x))) is the o.g.f. for the coordination sequence of the C_n lattice. Note that exp(t*arctanh(x)) is the e.g.f. for the Mittag_Leffler polynomials. See A137513. - Peter Bala, Apr 09 2017
Sum_{n>=0} 1/a(n) = 3/4 + sqrt(2)/16*Pi*coth( Pi*sqrt(2)/4) = 1.095237238050... - R. J. Mathar, May 07 2024
AUTHOR
N. J. A. Sloane, mbaake(AT)sunelc3.tphys.physik.uni-tuebingen.de (Michael Baake)
Number of points on surface of hexagonal prism: 12*n^2 + 2 for n > 0 (coordination sequence for W(2)).
(Formerly M4931)
+0
12
1, 14, 50, 110, 194, 302, 434, 590, 770, 974, 1202, 1454, 1730, 2030, 2354, 2702, 3074, 3470, 3890, 4334, 4802, 5294, 5810, 6350, 6914, 7502, 8114, 8750, 9410, 10094, 10802, 11534, 12290, 13070, 13874, 14702, 15554, 16430, 17330, 18254, 19202, 20174, 21170
COMMENTS
For n >= 1, a(n) is equal to the number of functions f:{1,2,3,4}->{1,2,...,n,n+1} such that Im(f) contains 2 fixed elements. - Aleksandar M. Janjic and Milan Janjic, Feb 24 2007
Equals binomial transform of [1, 13, 23, 1, -1, 1, -1, 1, ...]. - Gary W. Adamson, Apr 22 2008
Also sequence found by reading the segment (1, 14) together with the line from 14, in the direction 14, 50, ..., in the square spiral whose vertices are the generalized octagonal numbers A001082. - Omar E. Pol, Nov 02 2012
Unique sequence such that for all n > 0, n*a(1) + (n-1)*a(2) + (n-3)*a(3) + ... + 2*a(2) + a(1) = n^4. - Warren Breslow, Dec 12 2014
REFERENCES
Gmelin Handbook of Inorganic and Organometallic Chemistry, 8th Ed., 1994, TYPIX search code (229) cI2.
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
FORMULA
G.f.: (1+x)*(1+10*x+x^2)/(1-x)^3. - Simon Plouffe (see MAPLE line)
a(n) = (2n-1)^2 + (2n)^2 + (2n+1)^2 for n > 0. - Bruno Berselli, Jan 30 2012
a(n) = 3*a(n-1) - 3*a(n-2) + a(n-3); a(0)=1, a(1)=14, a(2)=50, a(3)=110. - Harvey P. Dale, Oct 09 2012
Sum_{n>=0} 1/a(n) = ((Pi/sqrt(6))*coth(Pi/sqrt(6)) + 3)/4.
Sum_{n>=0} (-1)^n/a(n) = ((Pi/sqrt(6))*cosech(Pi/sqrt(6)) + 3)/4. (End)
MATHEMATICA
Join[{1}, LinearRecurrence[{3, -3, 1}, {14, 50, 110}, 50]] (* Harvey P. Dale, Oct 09 2012 *)
Search completed in 0.021 seconds
|