A007588 -id:A007588 - cp's OEIS frontend

A005917 Rhombic dodecahedral numbers: a(n) = n^4 - (n - 1)^4.

1, 15, 65, 175, 369, 671, 1105, 1695, 2465, 3439, 4641, 6095, 7825, 9855, 12209, 14911, 17985, 21455, 25345, 29679, 34481, 39775, 45585, 51935, 58849, 66351, 74465, 83215, 92625, 102719, 113521, 125055, 137345, 150415, 164289, 178991

Offset: 1

N. J. A. Sloane

Final digits of a(n), i.e., a(n) mod 10, are repeated periodically with period of length 5 {1,5,5,5,9}. There is a symmetry in this list since the sum of two numbers equally distant from the ends is equal to 10 = 1 + 9 = 5 + 5 = 2*5. Last two digits of a(n), i.e., a(n) mod 100, are repeated periodically with period of length 50. - Alexander Adamchuk, Aug 11 2006
a(n) = VarScheme(n,2) in the scheme displayed in A128195. - Peter Luschny, Feb 26 2007
If Y is a 3-subset of a 2n-set X then, for n >= 2, a(n-2) is the number of 4-subsets of X intersecting Y. - Milan Janjic, Nov 18 2007
The numbers are the constant number found in magic squares of order n, where n is an odd number, see the comment in A006003. A Magic Square of side 1 is 1; 3 is 15; 5 is 65 and so on. - David Quentin Dauthier, Nov 07 2008
Two times the area of the triangle with vertices at (0,0), ((n - 1)^2, n^2), and (n^2, (n - 1)^2). - J. M. Bergot, Jun 25 2013
Bisection of A006003. - Omar E. Pol, Sep 01 2018
Construct an array M with M(0,n) = 2*n^2 + 4*n + 1 = A056220(n+1), M(n,0) = 2*n^2 + 1 = A058331(n) and M(n,n) = 2*n*(n+1) + 1 = A001844(n). Row(n) begins with all the increasing odd numbers from A058331(n) to A001844(n) and column(n) begins with all the decreasing odd numbers from A056220(n+1) to A001844(n). The sum of the terms in row(n) plus those in column(n) minus M(n,n) equals a(n+1). The first five rows of array M are [1, 7, 17, 31, 49, ...]; [3, 5, 15, 29, 47, ...]; [9, 11, 13, 27, 45, ...]; [19, 21, 23, 25, 43, ...]; [33, 35, 37, 39, 41, ...]. - J. M. Bergot, Jul 16 2013 [This contribution was moved here from A047926 by Petros Hadjicostas, Mar 08 2021.]
For n>=2, these are the primitive sides s of squares of type 2 described in A344332. - Bernard Schott, Jun 04 2021
(a(n) + 1) / 2 = A212133(n) is the number of cells in the n-th rhombic-dodecahedral polycube. - George Sicherman, Jan 21 2024

J. H. Conway and R. K. Guy, The Book of Numbers, p. 53.
E. Deza and M. M. Deza, Figurate Numbers, World Scientific Publishing, 2012, pp. 123-124.
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).

Vincenzo Librandi, Table of n, a(n) for n = 1..10000
Mario Defranco and Paul E. Gunnells, Hypergraph matrix models and generating functions, arXiv:2204.11361 [math.CO], 2022.
Milan Janjic, Two Enumerative Functions
T. P. Martin, Shells of atoms, Phys. Rep., 273 (1996), 199-241, eq. (9).
Andy Nicol, Illustration of Rhombic Dodecahedral Numbers
C. J. Pita Ruiz V., Some Number Arrays Related to Pascal and Lucas Triangles, J. Int. Seq. 16 (2013) #13.5.7
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
B. K. Teo and N. J. A. Sloane, Magic numbers in polygonal and polyhedral clusters, Inorgan. Chem. 24 (1985), 4545-4558.
Eric Weisstein's World of Mathematics, Rhombic Dodecahedral Number.
Eric Weisstein's World of Mathematics, Nexus Number.
D. Zeitlin, A family of Galileo sequences, Amer. Math. Monthly 82 (1975), 819-822.
Index entries for linear recurrences with constant coefficients, signature (4,-6,4,-1).

(1/12)*t*(2*n^3 - 3*n^2 + n) + 2*n - 1 for t = 2, 4, 6, ... gives A049480, A005894, A063488, A001845, A063489, A005898, A063490, A057813, A063491, A005902, A063492, A063493, A063494, A063495, A063496.
Column k=3 of A047969.
Cf. A128195, A176850, A005408, A176271, A212133.
Cf. A001844, A000583, A000290.
Cf. A007588, A000292, A000332, A002817, A342354.
Cf. A031215, A008292.
Cf. A016754, A344330, A344332.

a005917 n = a005917_list !! (n-1)
a005917_list = map sum $ f 1 [1, 3 ..] where
   f x ws = us : f (x + 2) vs where (us, vs) = splitAt x ws
-- Reinhard Zumkeller, Nov 13 2014

[n^4 - (n-1)^4: n in [1..50]]; // Vincenzo Librandi, Aug 01 2011

Table[n^4-(n-1)^4,{n,40}]  (* Harvey P. Dale, Apr 01 2011 *)
#[[2]]-#[[1]]&/@Partition[Range[0,40]^4,2,1] (* More efficient than the above Mathematica program because it only has to calculate each 4th power once *) (* Harvey P. Dale, Feb 07 2015 *)
Differences[Range[0,40]^4] (* Harvey P. Dale, Aug 11 2023 *)

a(n)=n^4-(n-1)^4 \\ Charles R Greathouse IV, Jul 31 2011

A005917_list, m = [], [24, -12, 2, 1]
for _ in range(10**2):
    A005917_list.append(m[-1])
    for i in range(3):
        m[i+1] += m[i] # Chai Wah Wu, Dec 15 2015

a(n) = (2*n - 1)*(2*n^2 - 2*n + 1).
Sum_{i=1..n} a(i) = n^4 = A000583(n). First differences of A000583.
G.f.: x*(1+x)*(1+10*x+x^2)/(1-x)^4. - Simon Plouffe in his 1992 dissertation
More generally, g.f. for n^m - (n - 1)^m is Euler(m, x)/(1 - x)^m, where Euler(m, x) is Eulerian polynomial of degree m (cf. A008292). E.g.f.: x*(exp(y/(1 - x)) - exp(x*y/(1 - x)))/(exp(x*y/(1 - x))-x*exp(y/(1 - x))). - Vladeta Jovovic, May 08 2002
a(n) = sum of the next (2*n - 1) odd numbers; i.e., group the odd numbers so that the n-th group contains (2*n - 1) elements like this: (1), (3, 5, 7), (9, 11, 13, 15, 17), (19, 21, 23, 25, 27, 29, 31), ... E.g., a(3) = 65 because 9 + 11 + 13 + 15 + 17 = 65. - Xavier Acloque, Oct 11 2003
a(n) = 2*n - 1 + 12*Sum_{i = 1..n} (i - 1)^2. - Xavier Acloque, Oct 16 2003
a(n) = (4*binomial(n,2) + 1)*sqrt(8*binomial(n,2) + 1). - Paul Barry, Mar 14 2004
Binomial transform of [1, 14, 36, 24, 0, 0, 0, ...], if the offset is 0. - Gary W. Adamson, Dec 20 2007
Sum_{i=1..n-1}(a(i) + a(i+1)) = 8*Sum_{i=1..n}(i^3 + i) = 16*A002817(n-1) for n > 1. - Bruno Berselli, Mar 04 2011
a(n+1) = a(n) + 2*(6*n^2 + 1) = a(n) + A005914(n). - Vincenzo Librandi, Mar 16 2011
a(n) = -a(-n+1). a(n) = (1/6)*(A181475(n) - A181475(n-2)). - Bruno Berselli, Sep 26 2011
a(n) = A045975(2*n-1,n) = A204558(2*n-1)/(2*n - 1). - Reinhard Zumkeller, Jan 18 2012
a(n+1) = Sum_{k=0..2*n+1} (A176850(n,k) - A176850(n-1,k))*(2*k + 1), n >= 1. - L. Edson Jeffery, Nov 02 2012
a(n) = A005408(n-1) * A001844(n-1) = (2*(n - 1) + 1) * (2*(n - 1)*n + 1) = A000290(n-1)*12 + 2 + a(n-1). - Bruce J. Nicholson, May 17 2017
a(n) = A007588(n) + A007588(n-1) = A000292(2n-1) + A000292(2n-2) + A000292(2n-3) = A002817(2n-1) - A002817(2n-2). - Bruce J. Nicholson, Oct 22 2017
a(n) = A005898(n-1) + 6*A000330(n-1) (cf. Deza, Deza, 2012, p. 123, Section 2.6.2). - Felix Fröhlich, Oct 01 2018
a(n) = A300758(n-1) + A005408(n-1). - Bruce J. Nicholson, Apr 23 2020
G.f.: polylog(-4, x)*(1-x)/x. See the Simon Plouffe formula above (with expanded numerator), and the g.f. of the rows of A008292 by Vladeta Jovovic, Sep 02 2002. - Wolfdieter Lang, May 10 2021

A006527 a(n) = (n^3 + 2*n)/3.

Original entry on oeis.org

0, 1, 4, 11, 24, 45, 76, 119, 176, 249, 340, 451, 584, 741, 924, 1135, 1376, 1649, 1956, 2299, 2680, 3101, 3564, 4071, 4624, 5225, 5876, 6579, 7336, 8149, 9020, 9951, 10944, 12001, 13124, 14315, 15576, 16909, 18316, 19799, 21360, 23001, 24724, 26531, 28424, 30405

Offset: 0

N. J. A. Sloane

Number of ways to color vertices (or edges) of a triangle using <= n colors, allowing only rotations.
Also: dot_product (1,2,...,n)*(2,3,...,n,1), n >= 0. - Clark Kimberling
Start from triacid and attach amino acids according to the reaction scheme that describes the reaction between the active sites. See the hyperlink below on chemistry. - Robert G. Wilson v, Aug 02 2002
Starting with offset 1 = row sums of triangle A158822 and binomial transform of (1, 3, 4, 2, 0, 0, 0, ...). - Gary W. Adamson, Mar 28 2009
One-ninth of sum of three consecutive cubes: a(n) = ((n-1)^3 + n^3 + (n+1)^3)/9. - Zak Seidov, Jul 22 2013
For n > 2, number of different cubes, formed after splitting a cube in color C_1, by parallel planes in the colors C_2, C_3, ..., C_n in three spatial dimensions (in the order of the colors from a fixed vertex). Generally, in a large hypercube n^d is f(n,d) = C(n+d-1, d) + C(n, d) different small hypercubes. See below for my formula a(n) = f(n,3). - Thomas Ordowski, Jun 15 2014
a(n) is a square for n = 1, 2 & 24; and for no other values up to 10^7 (see M. Gardner). - Michel Marcus, Sep 06 2015
Number of unit tetrahedra contained in an n-scale tetrahedron composed of a tetrahedral-octahedral honeycomb. - Jason Pruski, Aug 23 2017

M. Gardner, New Mathematical Diversions from Scientific American. Simon and Schuster, NY, 1966, p. 246.
S. Mukai, An Introduction to Invariants and Moduli, Cambridge, 2003; see p. 483.
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).

Vincenzo Librandi, Table of n, a(n) for n = 0..5000
B. Babcock and A. van Tuyl, Revisiting the spreading and covering numbers, arXiv preprint arXiv:1109.5847 [math.AC], 2011.
Richard A. Brualdi and Geir Dahl, Alternating Sign Matrices and Hypermatrices, and a Generalization of Latin Square, arXiv:1704.07752 [math.CO], 2017. See p. 8.
Peter Esser?, Guenter Stertenbrink, Triangles with Mac Mahon's pieces, digest of 14 messages in polyforms Yahoo group, Apr 14 - May 2, 2002.
Th. Grüner, A. Kerber, R. Laue and M. Meringer, Mathematics for Combinatorial Chemistry
T. P. Martin, Shells of atoms, Phys. Reports, 273 (1996), 199-241, eq. (11).
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
polyforms list, Triangles with MacMahon's pieces.
Taskcentre, McMahon's Triangles 2
Index entries for linear recurrences with constant coefficients, signature (4,-6,4,-1).

(1/12)*t*(n^3-n)+n for t = 2, 4, 6, ... gives A004006, A006527, A006003, A005900, A004068, A000578, A004126, A000447, A004188, A004466, A004467, A007588, A062025, A063521, A063522, A063523.
Column 1 of triangle A094414. Row 6 of the array in A107735.
Cf. A002264, A005843, A054602, A059100, A135184, A158822, A177342.
Cf. A000292 (unoriented), A000292(n-2) (chiral), A000290 (achiral) triangle colorings.
Row 2 of A324999 (simplex vertices and facets) and A327083 (simplex edges and ridges).

a006527 n = n * (n ^ 2 + 2) `div` 3  -- Reinhard Zumkeller, Jan 06 2014

[(n^3 + 2*n)/3: n in [0..50]]; // Vincenzo Librandi, May 15 2011

A006527:=z*(1+z**2)/(z-1)**4; # conjectured by Simon Plouffe in his 1992 dissertation
with(combinat):seq(lcm(fibonacci(4,n),fibonacci(2,n))/3,n=0..42); # Zerinvary Lajos, Apr 20 2008

Table[ (n^3 + 2*n)/3, {n, 0, 45} ]
LinearRecurrence[{4,-6,4,-1},{0,1,4,11},46] (* or *) CoefficientList[ Series[(x+x^3)/(x-1)^4,{x,0,49}],x] (* Harvey P. Dale, Jun 13 2011 *)

a(n)=n*(n^2+2)/3 \\ Charles R Greathouse IV, Jul 25 2011

a(0)=0, a(1)=1, a(2)=4, a(3)=11; for n > 3, a(n) = 4*a(n-1) - 6*a(n-2) + 4*a(n-3) - a(n-4). - Harvey P. Dale, Jun 13 2011
From Paul Barry, Mar 13 2003: (Start)
a(n) = 2*binomial(n+1, 3) + binomial(n, 1).
G.f.: x*(1+x^2)/(1-x)^4. (End)
a(n) = A000292(n) + A000292(n-2). - Alexander Adamchuk, May 20 2006
a(n) = n*A059100(n)/3. - Lekraj Beedassy, Feb 06 2007
a(n) = A054602(n)/3. - Zerinvary Lajos, Apr 20 2008
a(n) = ( n + Sum_{i=1..n} A177342(i) )/(n+1), with n > 0. - Bruno Berselli, May 19 2010
a(n) = A002264(A000578(n) + A005843(n)). - Reinhard Zumkeller, Jun 16 2011
a(n) = binomial(n+2, 3) + binomial(n, 3). - Thomas Ordowski, Jun 15 2014
a(n) = A000292(n) - A000292(-n). - Bruno Berselli, Sep 22 2016
E.g.f.: (x/3)*(3 + 3*x + x^2)*exp(x). - G. C. Greubel, Sep 01 2017
From Robert A. Russell, Oct 20 2020: (Start)
a(n) = 1*C(n,1) + 2*C(n,2) + 2*C(n,3), where the coefficient of C(n,k) is the number of oriented triangle colorings using exactly k colors.
a(n) = 2*A000292(n) - A000290(n) = 2*A000292(n-2) + A000290(n). (End)
Sum_{n>0} 1/a(n) = 3*(2*gamma + polygamma(0, 1-i*sqrt(2)) + polygamma(0, 1+i*sqrt(2)))/4 = 1.45245201414472469745354677573358867... where i denotes the imaginary unit. - Stefano Spezia, Aug 31 2023

More terms from Alexander Adamchuk, May 20 2006
Corrected and replaced 5th formula from Harvey P. Dale, Jun 13 2011
Deleted an erroneous comment. - N. J. A. Sloane, Dec 10 2018

A004068 Number of atoms in a decahedron with n shells.

Original entry on oeis.org

0, 1, 7, 23, 54, 105, 181, 287, 428, 609, 835, 1111, 1442, 1833, 2289, 2815, 3416, 4097, 4863, 5719, 6670, 7721, 8877, 10143, 11524, 13025, 14651, 16407, 18298, 20329, 22505, 24831, 27312, 29953, 32759, 35735, 38886, 42217, 45733, 49439

Offset: 0

Albert D. Rich (Albert_Rich(AT)msn.com)

Also as a(n)=(n/6)*(5*n^2+1), n>0: structured pentagonal diamond numbers (vertex structure 6) (cf. A081436 = alternate vertex; A000447 = structured diamonds; A100145 for more on structured numbers). - James A. Record (james.record(AT)gmail.com), Nov 07 2004
Number of atoms in decahedron with n shells, number = 5/6*(n^3) + 1/6*(n) (T. P. Martin, Shells of atoms, eq.(3)). - Brigitte Stepanov, Jul 02 2011
a(n+1) is the number of triples (w,x,y) having all terms in {0,...,n} and x+y >= w. - Clark Kimberling, Jun 14 2012
a(n) = Sum_{k=1..n} A215630(n,k) for n > 0. - Reinhard Zumkeller, Nov 11 2012
a(n) - a(n-2) = A010001(n-1), for n>1. - K. G. Stier, Dec 21 2012
a(n) is also a figurate number representing a cube of side n with a vertex cut off by a tetrahedron of side n-1. As such, a(n) = A000578(n) - A000292(n-1), n > 0. - Jean M. Morales, Aug 11 2013
The sequence starting with 1 is the third partial sum of (1, 4, 5, 5, 5, ...) and the binomial transform of (1, 6, 10, 5, 0, 0, 0, ...). - Gary W. Adamson, Sep 27 2015

Vincenzo Librandi, Table of n, a(n) for n = 0..5000
T. P. Martin, Shells of atoms, Phys. Reports, 273 (1996), 199-241, eq. (3).
Index entries for linear recurrences with constant coefficients, signature (4,-6,4,-1).

(1/12)*t*(n^3-n)+n for t = 2, 4, 6, ... gives A004006, A006527, A006003, A005900, A004068, A000578, A004126, A000447, A004188, A004466, A004467, A007588, A062025, A063521, A063522, A063523.

Cf. A000292, A005891, A006322 (partial sums), A010001, A081436, A100145, A215630.

[5*n^3/6+n/6: n in [0..50]]; // Vincenzo Librandi, May 15 2011

Table[5*n^3/6+n/6,{n,0,80}] (* Vladimir Joseph Stephan Orlovsky, Apr 18 2011 *)

A004068(n):=5*n^3/6+n/6$ makelist(A004068(n),n,0,20); /* Martin Ettl, Jan 07 2013 */

a(n)=5*n^3/6+n/6 \\ Charles R Greathouse IV, Sep 24 2015

def A004068(n): return n*(5*n**2+1)//6 # Chai Wah Wu, Mar 25 2025

a(n) = 5*binomial(n + 1, 3) + binomial(n, 1).
a(n) = 5*n^3/6 + n/6.
a(n) = Sum_{i=0..n-1} A005891(i). - Xavier Acloque, Oct 08 2003
G.f.: x*(1+3*x+x^2) / (1-x)^4. - R. J. Mathar, Jun 05 2011
E.g.f.: (x/6)*(5x^2 + 15x + 6)*exp(x). - G. C. Greubel, Sep 27 2015
Sum_{n>0} 1/a(n) = 3*(2*gamma + polygamma(0, 1-i/sqrt(5)) + polygamma(0, 1+i/sqrt(5))) = 1.233988011257952852492845364799197179252... where i denotes the imaginary unit. - Stefano Spezia, Aug 31 2023

Typo in definition corrected by Jean M. Morales, Aug 11 2013

A106483 Primes p such that 2*p^2 - 1 is also prime.

Original entry on oeis.org

2, 3, 7, 11, 13, 17, 41, 43, 59, 73, 109, 113, 127, 137, 157, 179, 181, 197, 199, 211, 251, 263, 277, 293, 311, 353, 367, 379, 409, 419, 433, 487, 563, 571, 577, 617, 619, 659, 701, 739, 743, 757, 797, 811, 827, 829, 839, 857, 937, 941, 1009, 1039, 1063

Offset: 1

Jonathan Vos Post, May 03 2005

Alois P. Heinz, Table of n, a(n) for n = 1..10000 (first 1000 terms from T. D. Noe)

Cf. A000040, A001358, A007588, A106482, A106484, A177104 (2p^3-1 prime), A182785 (2p^4-1 prime)

Cf. A092057 (2p^2 - 1).

[p: p in PrimesUpTo(2500)|  IsPrime(2*p^2-1)]; // Vincenzo Librandi, Jan 29 2011

q:= p-> andmap(isprime, [p, 2*p^2-1]):
select(q, [$2..2000])[];  # Alois P. Heinz, Jun 21 2022

Select[Table[Prime[n], {n, 500}], PrimeQ[2*#^2 - 1] &] (* Ray Chandler, May 03 2005 *)

a(n) is in this sequence iff A007588(a(n)) is an element of A001358.
a(n) is in this sequence iff A106482(a(n)) = 2.
a(n) is in this sequence iff a(n) is prime and 2*a(n)^2-1 is also prime.
a(n) = prime(A092058(n)). - R. J. Mathar, Aug 20 2019

Extended by Ray Chandler, May 03 2005

A004188 a(n) = n(3n^2 - 1)/2.

Original entry on oeis.org

0, 1, 11, 39, 94, 185, 321, 511, 764, 1089, 1495, 1991, 2586, 3289, 4109, 5055, 6136, 7361, 8739, 10279, 11990, 13881, 15961, 18239, 20724, 23425, 26351, 29511, 32914, 36569, 40485, 44671, 49136, 53889, 58939, 64295, 69966, 75961

Offset: 0

Albert D. Rich (Albert_Rich(AT)msn.com)

3-dimensional analog of centered polygonal numbers.

(1), (4+7), (10+13+16), (19+22+25+28), ... - Jon Perry, Sep 10 2004

E. Deza and M. M. Deza, Figurate numbers, World Scientific Publishing (2012), page 140.
T. P. Martin, Shells of atoms, Phys. Reports, 273 (1996), 199-241, eq. (11).

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

1/12*t*(n^3-n)+n for t = 2, 4, 6, ... gives A004006, A006527, A006003, A005900, A004068, A000578, A004126, A000447, A004188, A004466, A004467, A007588, A062025, A063521, A063522, A063523.
Cf. A002412, A016061, A051682.
Cf. A236770 (partial sums).

[n*(3*n^2-1)/2: n in [0..50]]; //Vincenzo Librandi, May 15 2011

seq(binomial(2*n+1,3)+binomial(n+1,3), n=0..37); # Zerinvary Lajos, Jan 21 2007

Table[n(3n^2-1)/2,{n,0,80}] (* Vladimir Joseph Stephan Orlovsky, Apr 18 2011 *)
LinearRecurrence[{4,-6,4,-1},{0,1,11,39},40] (* Harvey P. Dale, Jul 19 2019 *)

PARI
```
vector(40, n, n*(3*n^2-1)/2)
```

Partial sums of n-1 3-spaced triangular numbers, e.g., a(4) = t(1) + t(4) + t(7) = 1 + 10 + 28 = 39. - Jon Perry, Jul 23 2003
a(n) = C(2*n+1,3) + C(n+1,3), n >= 0. - Zerinvary Lajos, Jan 21 2007
a(n) = A000447(n) + A000292(n). - Zerinvary Lajos, Jan 21 2007
G.f.: x*(1+7*x+x^2) / (x-1)^4. - R. J. Mathar, Oct 08 2011
From Miquel Cerda, Dec 25 2016: (Start)
a(n) = A000578(n) + A135503(n).
a(n) = A007588(n) - A135503(n). (End)
E.g.f.: (x/2)*(2 + 9*x + 3*x^2)*exp(x). - G. C. Greubel, Sep 01 2017

A004466 a(n) = n(5n^2 - 2)/3.

Original entry on oeis.org

0, 1, 12, 43, 104, 205, 356, 567, 848, 1209, 1660, 2211, 2872, 3653, 4564, 5615, 6816, 8177, 9708, 11419, 13320, 15421, 17732, 20263, 23024, 26025, 29276, 32787, 36568, 40629, 44980, 49631, 54592

Offset: 0

Albert D. Rich (Albert_Rich(AT)msn.com)

3-dimensional analog of centered polygonal numbers.
Also as a(n)=(1/6)*(10*n^3-4*n), n>0: structured pentagonal anti-diamond numbers (vertex structure 11) (Cf. A051673 = alternate vertex A100188 = structured anti-diamonds; A100145 for more on structured numbers). - James A. Record (james.record(AT)gmail.com), Nov 07 2004
a(n+1)-10*a(n) = (n+1)*(5*(n+1)^2-2)/3 - (10n(n+1)(n+2)/6) = n. The unit digits are 0,1,2,3,4,5,6,7,8,9,0,1,2,3,4,5,6,7,8,9,... . - Eric Desbiaux, Aug 18 2008

E. Deza and M. M. Deza, Figurate numbers, World Scientific Publishing (2012), page 140.

Vincenzo Librandi, Table of n, a(n) for n = 0..5000
T. P. Martin, Shells of atoms, Phys. Reports, 273 (1996), 199-241, eq. (11).
Index entries for linear recurrences with constant coefficients, signature (4,-6,4,-1).

Cf. A062786 (first differences), A264853 (partial sums).

1/12*t*(n^3-n)+n for t = 2, 4, 6, ... gives A004006, A006527, A006003, A005900, A004068, A000578, A004126, A000447, A004188, A004466, A004467, A007588, A062025, A063521, A063522, A063523.

[n*(5*n^2-2)/3: n in [0..50]]; // Vincenzo Librandi, May 15 2011

A004466:=n->n*(5*n^2 - 2)/3; seq(A004466(n), n=0..50); # Wesley Ivan Hurt, Mar 10 2014

Table[n(5n^2-2)/3,{n,0,80}] (* Vladimir Joseph Stephan Orlovsky, Apr 18 2011 *)

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

G.f.: x*(1+8*x+x^2)/(1-x)^4. - Colin Barker, Jan 08 2012

E.g.f.: (x/3)*(3 + 15*x + 5*x^2)*exp(x). - G. C. Greubel, Sep 01 2017

A063521 a(n) = n(7n^2-4)/3.

Original entry on oeis.org

0, 1, 16, 59, 144, 285, 496, 791, 1184, 1689, 2320, 3091, 4016, 5109, 6384, 7855, 9536, 11441, 13584, 15979, 18640, 21581, 24816, 28359, 32224, 36425, 40976, 45891, 51184, 56869, 62960, 69471, 76416, 83809, 91664, 99995, 108816, 118141, 127984, 138359, 149280, 160761

Offset: 0

N. J. A. Sloane, Aug 02 2001

Also as a(n)=(1/6)*(14*n^3-8*n), n>0: structured heptagonal anti-diamond numbers (vertex structure 15) (Cf. A100186 = alternate vertex; A100188 = structured anti-diamonds; A100145 for more on structured numbers). - James A. Record (james.record(AT)gmail.com), Nov 07 2004

Harry J. Smith, Table of n, a(n) for n = 0..1000
T. P. Martin, Shells of atoms, Phys. Reports, 273 (1996), 199-241, eq. (11).
Index entries for linear recurrences with constant coefficients, signature (4, -6, 4, -1).

1/12*t*(n^3-n)+n for t = 2, 4, 6, ... gives A004006, A006527, A006003, A005900, A004068, A000578, A004126, A000447, A004188, A004466, A004467, A007588, A062025, A063521, A063522, A063523.

A063521:=n->n*(7*n^2-4)/3; seq(A063521(k), k=0..100); # Wesley Ivan Hurt, Oct 24 2013

lst={};Do[AppendTo[lst, n*(7*n^2-4)/3], {n, 1, 6!}];lst (* Vladimir Joseph Stephan Orlovsky, Sep 02 2008 *)
CoefficientList[Series[x*(1+12*x+x^2)/(1-x)^4, {x, 0, 50}], x] (* G. C. Greubel, Sep 01 2017 *)

a(n) = { n*(7*n^2 - 4)/3 } \\ Harry J. Smith, Aug 25 2009

G.f.: x*(1+12*x+x^2)/(1-x)^4. - Colin Barker, Jan 10 2012

E.g.f.: (x/3)*(3 + 21*x + 7*x^2)*exp(x). - G. C. Greubel, Sep 01 2017

A004126 a(n) = n(7n^2 - 1)/6.

Original entry on oeis.org

0, 1, 9, 31, 74, 145, 251, 399, 596, 849, 1165, 1551, 2014, 2561, 3199, 3935, 4776, 5729, 6801, 7999, 9330, 10801, 12419, 14191, 16124, 18225, 20501, 22959, 25606, 28449, 31495, 34751, 38224, 41921, 45849, 50015, 54426, 59089, 64011

Offset: 0

Albert D. Rich (Albert_Rich(AT)msn.com)

3-dimensional analog of centered polygonal numbers.
Sum of n triangular numbers starting from T(n), where T = A000217. E.g., a(4) = T(4) + T(5) + T(6) + T(7) = 10 + 15 + 21 + 28 = 74. - Amarnath Murthy, Jul 16 2004
Also as a(n) = (1/6)*(7*n^3-n), n>0: structured heptagonal diamond numbers (vertex structure 8). Cf. A100179 = alternate vertex; A000447 = structured diamonds; A100145 for more on structured numbers. - James A. Record (james.record(AT)gmail.com), Nov 07 2004
Partial sums of A069099, centered heptagonal numbers (A000566). - Jonathan Vos Post, Mar 16 2006
Binomial transform of (0, 1, 7, 7, 0, 0, 0, ...) and third partial sum of (0, 1, 6, 7, 7, 7, ...). - Gary W. Adamson, Oct 05 2015

E. Deza and M. M. Deza, Figurate numbers, World Scientific Publishing (2012), page 140.

Vincenzo Librandi, Table of n, a(n) for n = 0..5000
T. P. Martin, Shells of atoms, Phys. Reports, 273 (1996), 199-241, eq. (11).
Index entries for linear recurrences with constant coefficients, signature (4,-6,4,-1).

1/12*t*(n^3-n)+n for t = 2, 4, 6, ... gives A004006, A006527, A006003, A005900, A004068, A000578, A004126, A000447, A004188, A004466, A004467, A007588, A062025, A063521, A063522, A063523.
Cf. A000217, A000566, A016993, A069099.
Cf. A000447, A000292.

[n*(7*n^2-1)/6: n in [0..50]]; // Vincenzo Librandi, May 15 2011

seq(binomial(2*n+1,3)-binomial(n+1,3), n=0..38); # Zerinvary Lajos, Jan 21 2007

Table[n (7 n^2 - 1)/6, {n, 0, 80}] (* Vladimir Joseph Stephan Orlovsky, Apr 18 2011 *)

makelist(n*(7*n^2-1)/6,n,0,30); /* Martin Ettl, Jan 08 2013 */

vector(100, n, n--; n*(7*n^2 - 1)/6) \\ Altug Alkan, Oct 06 2015

a(n) = C(2*n+1,3)-C(n+1,3), n>=0. - Zerinvary Lajos, Jan 21 2007
a(n) = A000447(n) - A000292(n). - Zerinvary Lajos, Jan 21 2007
G.f.: x*(1+5*x+x^2)/(1-x)^4. - Colin Barker, Mar 02 2012
E.g.f.: (x/6)*(7*x^2 + 21*x + 6)*exp(x). - G. C. Greubel, Oct 05 2015
a(n) = Sum_{i = n..2*n-1} A000217(i). - Bruno Berselli, Sep 06 2017
a(n) = n^3 + Sum_{k=0..n-1} k*(k+1)/2. Alternately, a(n) = A000578(n) + A000292(n-1) for n>0. - Bruno Berselli, May 23 2018

A062392 a(n) = n^4 - (n-1)^4 + (n-2)^4 - ... 0^4.

Original entry on oeis.org

0, 1, 15, 66, 190, 435, 861, 1540, 2556, 4005, 5995, 8646, 12090, 16471, 21945, 28680, 36856, 46665, 58311, 72010, 87990, 106491, 127765, 152076, 179700, 210925, 246051, 285390, 329266, 378015, 431985, 491536, 557040, 628881, 707455, 793170, 886446, 987715

Offset: 0

Henry Bottomley, Jun 21 2001

Number of edges in the join of two complete graphs of order n^2 and n, K_n^2 * K_n. - Roberto E. Martinez II, Jan 07 2002
The general formula for alternating sums of powers is in terms of the Swiss-Knife polynomials P(n,x) A153641 2^(-n-1)(P(n,1)-(-1)^k P(n,2k+1)). Thus a(k) = |2^(-5)(P(4,1)-(-1)^k P(4,2k+1))|. - Peter Luschny, Jul 12 2009
Define an infinite symmetric array by T(n,m) = n*(n-1) + m for 0 <= m <= n and T(n,m) = T(m,n), n >= 0. Then a(n) is the sum of terms in the top left (n+1) X (n+1) subarray: a(n) = Sum_{r=0..n} Sum_{c=0..n} T(r,c). - J. M. Bergot, Jul 05 2013
a(n) is the sum of all positive numbers less than A002378(n). - J. M. Bergot, Aug 30 2013
Except the first term, these are triangular numbers that remain triangular when divided by their index, e.g., 66 divided by 11 gives 6. - Waldemar Puszkarz, Sep 14 2017
a(n) is the semiperimeter of the unique primitive Pythagorean triple such that (a-b+c)/2 = T(n) = A000217(n). Its long leg and hypotenuse are consecutive natural numbers and the triple is (2*T(n) - 1, 2*T(n)*(T(n) - 1), 2*T(n)*(T(n) - 1) + 1). - Miguel-Ángel Pérez García-Ortega, May 27 2025

			From _Bruno Berselli_, Oct 30 2017: (Start)
After 0:
1   =                 -(1) + (2);
15  =             -(1 + 2) + (3 + 4 + 5 + 2*3);
66  =         -(1 + 2 + 3) + (4 + 5 + 6 + 7 + ... + 11 + 3*4);
190 =     -(1 + 2 + 3 + 4) + (5 + 6 + 7 + 8 + ... + 19 + 4*5);
435 = -(1 + 2 + 3 + 4 + 5) + (6 + 7 + 8 + 9 + ... + 29 + 5*6), etc. (End)

T. A. Gulliver, Sequences from Cubes of Integers, Int. Math. Journal, 4 (2003), 439-445.

Harry J. Smith, Table of n, a(n) for n = 0..1000
Milan Janjic, Two Enumerative Functions.
Index entries for linear recurrences with constant coefficients, signature (5,-10,10,-5,1).

Cf. A000538, A000583. A062393 provides the result for 5th powers, A011934 for cubes, A000217 for squares, A001057 (unsigned) for nonnegative integers, A000035 (offset) for 0th powers.
Cf. A000217, A000384, A007588.
Cf. A236770 (see crossrefs).
Cf. A384329, A384369.

a := n -> (2*n^2+n^3-1)*n/2; # Peter Luschny, Jul 12 2009

Table[n (n + 1) (n^2 + n - 1)/2, {n, 0, 40}] (* Harvey P. Dale, Oct 19 2011 *)

{ a=0; for (n=0, 1000, write("b062392.txt", n, " ", a=n^4 - a) ) } \\ Harry J. Smith, Aug 07 2009

a(n) = n*(n+1)*(n^2 + n - 1)/2 = n^4 - a(n-1) = A000583(n) - a(n-1) = A000217(A028387(n-1)) = A000217(n)*A028387(n-1).
a(n) = Sum_{i=0..n} A007588(i) for n > 0. - Jonathan Vos Post, Mar 15 2006
a(n) = 5*a(n-1) - 10*a(n-2) + 10*a(n-3) - 5*a(n-4) + a(n-5) for n > 4. - Harvey P. Dale, Oct 19 2011
G.f.: x*(x*(x + 10) + 1)/(1 - x)^5. - Harvey P. Dale, Oct 19 2011
a(n) = A000384(A000217(n)). - Bruno Berselli, Jan 31 2014
a(n) = A110450(n) - A002378(n). - Gionata Neri, May 13 2015
Sum_{n>=1} 1/a(n) = tan(sqrt(5)*Pi/2)*2*Pi/sqrt(5). - Amiram Eldar, Jan 22 2024
a(n) = sqrt(144*A288876(n-2) + 72*A006542(n+2) + A000537(n)). - Yasser Arath Chavez Reyes, Jul 22 2024
E.g.f.: exp(x)*x*(2 + 13*x + 8*x^2 + x^3)/2. - Stefano Spezia, Apr 27 2025
a(n) = A000217(n)*(2*A000217(n)-1). - Miguel-Ángel Pérez García-Ortega, May 27 2025

A033430 a(n) = 4*n^3.

Original entry on oeis.org

0, 4, 32, 108, 256, 500, 864, 1372, 2048, 2916, 4000, 5324, 6912, 8788, 10976, 13500, 16384, 19652, 23328, 27436, 32000, 37044, 42592, 48668, 55296, 62500, 70304, 78732, 87808, 97556, 108000, 119164, 131072, 143748, 157216, 171500, 186624, 202612, 219488

Offset: 0

Jeff Burch

2*a(n) = (2*n)^3 is a perfect cube.
Number of edges of the product of two complete bipartite graphs, each of order 2n, K_n,n x K_n,n - Roberto E. Martinez II, Jan 07 2002
This sequence is related to A049451 by a(n) = n*A049451(n) + sum( A049451(i), i=0..n-1 ) for n>0. - Bruno Berselli, Dec 19 2013
For n>=3, also the detour index of the n-gear graph. - Eric W. Weisstein, Dec 20 2017
For n > 0, this sequence can be obtained by summing consecutive blocks of odd numbers where the n-th block contains the next 2n odd numbers. - Marco Zárate, Jun 15 2025

Vincenzo Librandi, Table of n, a(n) for n = 0..750
Frank Ellermann, Illustration of binomial transforms
Eric Weisstein's World of Mathematics, Detour Index
Eric Weisstein's World of Mathematics, Gear Graph
Index entries for linear recurrences with constant coefficients, signature (4,-6,4,-1).

Cf. A000578, A049451.
Cf. A000292, A007588.
Cf. A001844.

[4*n^3: n in [0..40]]; // Vincenzo Librandi, Apr 27 2011

4 Range[0, 40]^3 (* Harvey P. Dale, Sep 07 2016 *)
LinearRecurrence[{4, -6, 4, -1}, {0, 4, 32, 108}, 40] (* Harvey P. Dale, Sep 07 2016 *)
Table[4 n^3, {n, 0, 20}] (* Eric W. Weisstein, Dec 20 2017 *)
CoefficientList[Series[(4 x (1 + 4 x + x^2))/(-1 + x)^4, {x, 0, 20}], x] (* Eric W. Weisstein, Dec 20 2017 *)

a(n)=4*n^3 \\ Charles R Greathouse IV, Oct 07 2015

G.f. 4*x*(1+4*x+x^2)/ (x-1)^4. - R. J. Mathar, Feb 01 2011
From Ilya Gutkovskiy, May 25 2016: (Start)
E.g.f.: 4*x*(1 + 3*x + x^2)*exp(x).
Sum_{n>=1} 1/a(n) = zeta(3)/4. (End)
Product_{n>=1} a(n)/A280089(n) = Pi. - Daniel Suteu, Dec 26 2016
From Bruce J. Nicholson, Dec 07 2019: (Start)
a(n) = 24*A000292(n-1) + 4*n.
a(n) = 2*A007588(n) + 2*n. (End)
a(n) = Sum_{k=0..2*n-1} (2*n*(n-1)-2*k+1). - Sean A. Irvine, Jun 19 2025

cp's OEIS Frontend

A005917 Rhombic dodecahedral numbers: a(n) = n^4 - (n - 1)^4.

Views

Author

Keywords

Comments

References

Links

Crossrefs

Programs

Haskell

Magma

Mathematica

PARI

Python

Formula

A006527 a(n) = (n^3 + 2*n)/3.

Views

Author

Keywords

Comments

References

Links

Crossrefs

Programs

Haskell

Magma

Maple

Mathematica

PARI

Formula

Extensions

A004068 Number of atoms in a decahedron with n shells.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Magma

Mathematica

Maxima

PARI

Python

Formula

Extensions

A106483 Primes p such that 2*p^2 - 1 is also prime.

Views

Author

Keywords

Links

Crossrefs

Programs

Magma

Maple

Mathematica

Formula

Extensions

A004188 a(n) = n*(3*n^2 - 1)/2.

Views

Author

Keywords

Comments

References

Links

Crossrefs

Programs

Magma

Maple

Mathematica

PARI

Formula

A004466 a(n) = n*(5*n^2 - 2)/3.

Views

Author

Keywords

Comments

References

Links

A004188 a(n) = n(3n^2 - 1)/2.

A004466 a(n) = n(5n^2 - 2)/3.

A063521 a(n) = n(7n^2-4)/3.

A004126 a(n) = n(7n^2 - 1)/6.