cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-10 of 31 results. Next

A001399 a(n) is the number of partitions of n into at most 3 parts; also partitions of n+3 in which the greatest part is 3; also number of unlabeled multigraphs with 3 nodes and n edges.

Original entry on oeis.org

1, 1, 2, 3, 4, 5, 7, 8, 10, 12, 14, 16, 19, 21, 24, 27, 30, 33, 37, 40, 44, 48, 52, 56, 61, 65, 70, 75, 80, 85, 91, 96, 102, 108, 114, 120, 127, 133, 140, 147, 154, 161, 169, 176, 184, 192, 200, 208, 217, 225, 234, 243, 252, 261, 271, 280, 290, 300, 310, 320, 331, 341
Offset: 0

Views

Author

Keywords

Comments

Also number of tripods (trees with exactly 3 leaves) on n vertices. - Eric W. Weisstein, Mar 05 2011
Also number of partitions of n+3 into exactly 3 parts; number of partitions of n in which the greatest part is less than or equal to 3; and the number of nonnegative solutions to b + 2c + 3d = n.
Also a(n) gives number of partitions of n+6 into 3 distinct parts and number of partitions of 2n+9 into 3 distinct and odd parts, e.g., 15 = 11 + 3 + 1 = 9 + 5 + 1 = 7 + 5 + 3. - Jon Perry, Jan 07 2004
Also bracelets with n+3 beads 3 of which are red (so there are 2 possibilities with 5 beads).
More generally, the number of partitions of n into at most k parts is also the number of partitions of n+k into k positive parts, the number of partitions of n+k in which the greatest part is k, the number of partitions of n in which the greatest part is less than or equal to k, the number of partitions of n+k(k+1)/2 into exactly k distinct positive parts, the number of nonnegative solutions to b + 2c + 3d + ... + kz = n and the number of nonnegative solutions to 2c + 3d + ... + kz <= n. - Henry Bottomley, Apr 17 2001
Also coefficient of q^n in the expansion of (m choose 3)_q as m goes to infinity. - Y. Kelly Itakura (yitkr(AT)mta.ca), Aug 21 2002
From Winston C. Yang (winston(AT)cs.wisc.edu), Apr 30 2002: (Start)
Write 1,2,3,4,... in a hexagonal spiral around 0, then a(n) for n > 0 is formed by the folding points (including the initial 1). The spiral begins:
.
85--84--83--82--81--80
/ \
86 56--55--54--53--52 79
/ / \ \
87 57 33--32--31--30 51 78
/ / / \ \ \
88 58 34 16--15--14 29 50 77
/ / / / \ \ \ \
89 59 35 17 5---4 13 28 49 76
/ / / / / \ \ \ \ \
90 60 36 18 6 0 3 12 27 48 75
/ / / / / / / / / / /
91 61 37 19 7 1---2 11 26 47 74
\ \ \ \ / / / /
62 38 20 8---9--10 25 46 73
\ \ \ / / /
63 39 21--22--23--24 45 72
\ \ / /
64 40--41--42--43--44 71
\ /
65--66--67--68--69--70
.
a(p) is maximal number of hexagons in a polyhex with perimeter at most 2p + 6. (End)
a(n-3) is the number of partitions of n into 3 distinct parts, where 0 is allowed as a part. E.g., at n=9, we can write 8+1+0, 7+2+0, 6+3+0, 4+5+0, 1+2+6, 1+3+5 and 2+3+4, which is a(6)=7. - Jon Perry, Jul 08 2003
a(n) gives number of partitions of n+6 into parts <=3 where each part is used at least once (subtract 6=1+2+3 from n). - Jon Perry, Jul 03 2004
This is also the number of partitions of n+3 into exactly 3 parts (there is a 1-to-1 correspondence between the number of partitions of n+3 in which the greatest part is 3 and the number of partitions of n+3 into exactly three parts). - Graeme McRae, Feb 07 2005
Apply the Riordan array (1/(1-x^3),x) to floor((n+2)/2). - Paul Barry, Apr 16 2005
Also, number of triangles that can be created with odd perimeter 3,5,7,9,11,... with all sides whole numbers. Note that triangles with even perimeter can be generated from the odd ones by increasing each side by 1. E.g., a(1) = 1 because perimeter 3 can make {1,1,1} 1 triangle. a(4) = 3 because perimeter 9 can make {1,4,4} {2,3,4} {3,3,3} 3 possible triangles. - Bruce Love (bruce_love(AT)ofs.edu.sg), Nov 20 2006
Also number of nonnegative solutions of the Diophantine equation x+2*y+3*z=n, cf. Pólya/Szegő reference.
From Vladimir Shevelev, Apr 23 2011: (Start)
Also a(n-3), n >= 3, is the number of non-equivalent necklaces of 3 beads each of them painted by one of n colors.
The sequence {a(n-3), n >= 3} solves the so-called Reis problem about convex k-gons in case k=3 (see our comment to A032279).
a(n-3) (n >= 3) is an essentially unimprovable upper estimate for the number of distinct values of the permanent in (0,1)-circulants of order n with three 1's in every row. (End)
A001399(n) is the number of 3-tuples (w,x,y) having all terms in {0,...,n} and w = 2*x+3*y. - Clark Kimberling, Jun 04 2012
Also, for n >= 3, a(n-3) is the number of the distinct triangles in an n-gon, see the Ngaokrajang links. - Kival Ngaokrajang, Mar 16 2013
Also, a(n) is the total number of 5-curve coin patterns (5C4S type: 5 curves covering full 4 coins and symmetry) packing into fountain of coins base (n+3). See illustration in links. - Kival Ngaokrajang, Oct 16 2013
Also a(n) = half the number of minimal zero sequences for Z_n of length 3 [Ponomarenko]. - N. J. A. Sloane, Feb 25 2014
Also, a(n) equals the number of linearly-independent terms at 2n-th order in the power series expansion of an Octahedral Rotational Energy Surface (cf. Harter & Patterson). - Bradley Klee, Jul 31 2015
Also Molien series for invariants of finite Coxeter groups D_3 and A_3. - N. J. A. Sloane, Jan 10 2016
Number of different distributions of n+6 identical balls in 3 boxes as x,y,z where 0 < x < y < z. - Ece Uslu and Esin Becenen, Jan 11 2016
a(n) is also the number of partitions of 2*n with <= n parts and no part >= 4. The bijection to partitions of n with no part >= 4 is: 1 <-> 2, 2 <-> 1 + 3, 3 <-> 3 + 3 (observing the order of these rules). The <- direction uses the following fact for partitions of 2*n with <= n parts and no part >=4: for each part 1 there is a part 3, and an even number (including 0) of remaining parts 3. - Wolfdieter Lang, May 21 2019
List of the terms in A000567(n>=1), A049450(n>=1), A033428(n>=1), A049451(n>=1), A045944(n>=1), and A003215(n) in nondecreasing order. List of the numbers A056105(n)-1, A056106(n)-1, A056107(n)-1, A056108(n)-1, A056109(n)-1, and A003215(m) with n >= 1 and m >= 0 in nondecreasing order. Numbers of the forms 3n*(n-1)+1, n*(3n-2), n*(3n-1), 3n^2, n*(3n+1), n*(3n+2) with n >= 1 listed in nondecreasing order. Integers m such that lattice points from 1 through m on a hexagonal spiral starting at 1 forms a convex polygon. - Ya-Ping Lu, Jan 24 2024

Examples

			G.f. = 1 + x + 2*x^2 + 3*x^3 + 4*x^4 + 5*x^5 + 7*x^6 + 8*x^7 + 10*x^8 + 12*x^9 + ...
Recall that in a necklace the adjacent beads have distinct colors. Suppose we have n colors with labels 1,...,n. Two colorings of the beads are equivalent if the cyclic sequences of the distances modulo n between labels of adjacent colors have the same period. If n=4, all colorings are equivalent. E.g., for the colorings {1,2,3} and {1,2,4} we have the same period {1,1,2} of distances modulo 4. So, a(n-3)=a(1)=1. If n=5, then we have two such periods {1,1,3} and {1,2,2} modulo 5. Thus a(2)=2. - _Vladimir Shevelev_, Apr 23 2011
a(0) = 1, i.e., {1,2,3} Number of different distributions of 6 identical balls to 3 boxes as x,y and z where 0 < x < y < z. - _Ece Uslu_, Esin Becenen, Jan 11 2016
a(3) = 3, i.e., {1,2,6}, {1,3,5}, {2,3,4} Number of different distributions of 9 identical balls in 3 boxes as x,y and z where 0 < x < y < z. - _Ece Uslu_, Esin Becenen, Jan 11 2016
From _Gus Wiseman_, Apr 15 2019: (Start)
The a(0) = 1 through a(8) = 10 integer partitions of n with at most three parts are the following. The Heinz numbers of these partitions are given by A037144.
  ()  (1)  (2)   (3)    (4)    (5)    (6)    (7)    (8)
           (11)  (21)   (22)   (32)   (33)   (43)   (44)
                 (111)  (31)   (41)   (42)   (52)   (53)
                        (211)  (221)  (51)   (61)   (62)
                               (311)  (222)  (322)  (71)
                                      (321)  (331)  (332)
                                      (411)  (421)  (422)
                                             (511)  (431)
                                                    (521)
                                                    (611)
The a(0) = 1 through a(7) = 8 integer partitions of n + 3 whose greatest part is 3 are the following. The Heinz numbers of these partitions are given by A080193.
  (3)  (31)  (32)   (33)    (322)    (332)     (333)      (3322)
             (311)  (321)   (331)    (3221)    (3222)     (3331)
                    (3111)  (3211)   (3311)    (3321)     (32221)
                            (31111)  (32111)   (32211)    (33211)
                                     (311111)  (33111)    (322111)
                                               (321111)   (331111)
                                               (3111111)  (3211111)
                                                          (31111111)
Non-isomorphic representatives of the a(0) = 1 through a(5) = 5 unlabeled multigraphs with 3 vertices and n edges are the following.
  {}  {12}  {12,12}  {12,12,12}  {12,12,12,12}  {12,12,12,12,12}
            {13,23}  {12,13,23}  {12,13,23,23}  {12,13,13,23,23}
                     {13,23,23}  {13,13,23,23}  {12,13,23,23,23}
                                 {13,23,23,23}  {13,13,23,23,23}
                                                {13,23,23,23,23}
The a(0) = 1 through a(8) = 10 strict integer partitions of n - 6 with three parts are the following (A = 10, B = 11). The Heinz numbers of these partitions are given by A007304.
  (321)  (421)  (431)  (432)  (532)  (542)  (543)  (643)   (653)
                (521)  (531)  (541)  (632)  (642)  (652)   (743)
                       (621)  (631)  (641)  (651)  (742)   (752)
                              (721)  (731)  (732)  (751)   (761)
                                     (821)  (741)  (832)   (842)
                                            (831)  (841)   (851)
                                            (921)  (931)   (932)
                                                   (A21)   (941)
                                                           (A31)
                                                           (B21)
The a(0) = 1 through a(8) = 10 integer partitions of n + 3 with three parts are the following. The Heinz numbers of these partitions are given by A014612.
  (111)  (211)  (221)  (222)  (322)  (332)  (333)  (433)  (443)
                (311)  (321)  (331)  (422)  (432)  (442)  (533)
                       (411)  (421)  (431)  (441)  (532)  (542)
                              (511)  (521)  (522)  (541)  (551)
                                     (611)  (531)  (622)  (632)
                                            (621)  (631)  (641)
                                            (711)  (721)  (722)
                                                   (811)  (731)
                                                          (821)
                                                          (911)
The a(0) = 1 through a(8) = 10 integer partitions of n whose greatest part is <= 3 are the following. The Heinz numbers of these partitions are given by A051037.
  ()  (1)  (2)   (3)    (22)    (32)     (33)      (322)      (332)
           (11)  (21)   (31)    (221)    (222)     (331)      (2222)
                 (111)  (211)   (311)    (321)     (2221)     (3221)
                        (1111)  (2111)   (2211)    (3211)     (3311)
                                (11111)  (3111)    (22111)    (22211)
                                         (21111)   (31111)    (32111)
                                         (111111)  (211111)   (221111)
                                                   (1111111)  (311111)
                                                              (2111111)
                                                              (11111111)
The a(0) = 1 through a(6) = 7 strict integer partitions of 2n+9 with 3 parts, all of which are odd, are the following. The Heinz numbers of these partitions are given by A307534.
  (5,3,1)  (7,3,1)  (7,5,1)  (7,5,3)   (9,5,3)   (9,7,3)   (9,7,5)
                    (9,3,1)  (9,5,1)   (9,7,1)   (11,5,3)  (11,7,3)
                             (11,3,1)  (11,5,1)  (11,7,1)  (11,9,1)
                                       (13,3,1)  (13,5,1)  (13,5,3)
                                                 (15,3,1)  (13,7,1)
                                                           (15,5,1)
                                                           (17,3,1)
The a(0) = 1 through a(8) = 10 strict integer partitions of n + 3 with 3 parts where 0 is allowed as a part (A = 10):
  (210)  (310)  (320)  (420)  (430)  (530)  (540)  (640)  (650)
                (410)  (510)  (520)  (620)  (630)  (730)  (740)
                       (321)  (610)  (710)  (720)  (820)  (830)
                              (421)  (431)  (810)  (910)  (920)
                                     (521)  (432)  (532)  (A10)
                                            (531)  (541)  (542)
                                            (621)  (631)  (632)
                                                   (721)  (641)
                                                          (731)
                                                          (821)
The a(0) = 1 through a(7) = 7 integer partitions of n + 6 whose distinct parts are 1, 2, and 3 are the following. The Heinz numbers of these partitions are given by A143207.
  (321)  (3211)  (3221)   (3321)    (32221)    (33221)     (33321)
                 (32111)  (32211)   (33211)    (322211)    (322221)
                          (321111)  (322111)   (332111)    (332211)
                                    (3211111)  (3221111)   (3222111)
                                               (32111111)  (3321111)
                                                           (32211111)
                                                           (321111111)
(End)
Partitions of 2*n with <= n parts and no part >= 4: a(3) = 3 from (2^3), (1,2,3), (3^2) mapping to (1^3), (1,2), (3), the partitions of 3 with no part >= 4, respectively. - _Wolfdieter Lang_, May 21 2019
		

References

  • R. Ayoub, An Introduction to the Analytic Theory of Numbers, Amer. Math. Soc., 1963; Chapter III, Problem 33.
  • L. Comtet, Advanced Combinatorics, Reidel, 1974, p. 110, D(n); page 263, #18, P_n^{3}.
  • J. L. Gross and J. Yellen, eds., Handbook of Graph Theory, CRC Press, 2004; p. 517.
  • H. Gupta et al., Tables of Partitions. Royal Society Mathematical Tables, Vol. 4, Cambridge Univ. Press, 1958, p. 2.
  • F. Harary and E. M. Palmer, Graphical Enumeration, Academic Press, NY, 1973, p. 88, (4.1.18).
  • G. H. Hardy and E. M. Wright, An Introduction to the Theory of Numbers. 3rd ed., Oxford Univ. Press, 1954, p. 275.
  • R. Honsberger, Mathematical Gems III, Math. Assoc. Amer., 1985, p. 39.
  • J. H. van Lint, Combinatorial Seminar Eindhoven, Lecture Notes Math., 382 (1974), see pp. 33-34.
  • G. Pólya and G. Szegő, Problems and Theorems in Analysis I (Springer 1924, reprinted 1972), Part One, Chap. 1, Sect. 1, Problem 25.
  • N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
  • N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).

Crossrefs

Programs

  • Haskell
    a001399 = p [1,2,3] where
       p _      0 = 1
       p []     _ = 0
       p ks'@(k:ks) m = if m < k then 0 else p ks' (m - k) + p ks m
    -- Reinhard Zumkeller, Feb 28 2013
    
  • Magma
    I:=[1,1,2,3,4,5]; [n le 6 select I[n] else Self(n-1)+Self(n-2)-Self(n-4)-Self(n-5)+Self(n-6): n in [1..80]]; // Vincenzo Librandi, Feb 14 2015
    
  • Magma
    [#RestrictedPartitions(n,{1,2,3}): n in [0..62]]; // Marius A. Burtea, Jan 06 2019
    
  • Magma
    [Round((n+3)^2/12): n in [0..70]]; // Marius A. Burtea, Jan 06 2019
    
  • Maple
    A001399 := proc(n)
        round( (n+3)^2/12) ;
    end proc:
    seq(A001399(n),n=0..40) ;
    with(combstruct):ZL4:=[S,{S=Set(Cycle(Z,card<4))}, unlabeled]:seq(count(ZL4,size=n),n=0..61); # Zerinvary Lajos, Sep 24 2007
    B:=[S,{S = Set(Sequence(Z,1 <= card),card <=3)},unlabelled]: seq(combstruct[count](B, size=n), n=0..61); # Zerinvary Lajos, Mar 21 2009
  • Mathematica
    CoefficientList[ Series[ 1/((1 - x)*(1 - x^2)*(1 - x^3)), {x, 0, 65} ], x ]
    Table[ Length[ IntegerPartitions[n, 3]], {n, 0, 61} ] (* corrected by Jean-François Alcover, Aug 08 2012 *)
    k = 3; Table[(Apply[Plus, Map[EulerPhi[ # ]Binomial[n/#, k/# ] &, Divisors[GCD[n, k]]]]/n + Binomial[If[OddQ[n], n - 1, n - If[OddQ[k], 2, 0]]/2, If[OddQ[k], k - 1, k]/2])/2, {n, k, 50}] (* Robert A. Russell, Sep 27 2004 *)
    LinearRecurrence[{1,1,0,-1,-1,1},{1,1,2,3,4,5},70] (* Harvey P. Dale, Jun 21 2012 *)
    a[ n_] := With[{m = Abs[n + 3] - 3}, Length[ IntegerPartitions[ m, 3]]]; (* Michael Somos, Dec 25 2014 *)
    k=3 (* Number of red beads in bracelet problem *);CoefficientList[Series[(1/k Plus@@(EulerPhi[#] (1-x^#)^(-(k/#))&/@Divisors[k])+(1+x)/(1-x^2)^Floor[(k+2)/2])/2,{x,0,50}],x] (* Herbert Kociemba, Nov 04 2016 *)
    Table[Length[Select[IntegerPartitions[n,{3}],UnsameQ@@#&]],{n,0,30}] (* Gus Wiseman, Apr 15 2019 *)
  • PARI
    {a(n) = round((n + 3)^2 / 12)}; /* Michael Somos, Sep 04 2006 */
    
  • Python
    [round((n+3)**2 / 12) for n in range(0,62)] # Ya-Ping Lu, Jan 24 2024

Formula

G.f.: 1/((1 - x) * (1 - x^2) * (1 - x^3)) = -1/((x+1)*(x^2+x+1)*(x-1)^3); Simon Plouffe in his 1992 dissertation
a(n) = round((n + 3)^2/12). Note that this cannot be of the form (2*i + 1)/2, so ties never arise.
a(n) = A008284(n+3, 3), n >= 0.
a(n) = 1 + a(n-2) + a(n-3) - a(n-5) for all n in Z. - Michael Somos, Sep 04 2006
a(n) = a(-6 - n) for all n in Z. - Michael Somos, Sep 04 2006
a(6*n) = A003215(n), a(6*n + 1) = A000567(n + 1), a(6*n + 2) = A049450(n + 1), a(6*n + 3) = A033428(n + 1), a(6*n + 4) = A049451(n + 1), a(6*n + 5) = A045944(n + 1).
a(n) = a(n-1) + A008615(n+2) = a(n-2) + A008620(n) = a(n-3) + A008619(n) = A001840(n+1) - a(n-1) = A002620(n+2) - A001840(n) = A000601(n) - A000601(n-1). - Henry Bottomley, Apr 17 2001
P(n, 3) = (1/72) * (6*n^2 - 7 - 9*pcr{1, -1}(2, n) + 8*pcr{2, -1, -1}(3, n)) (see Comtet). [Here "pcr" stands for "prime circulator" and it is defined on p. 109 of Comtet, while the formula appears on p. 110. - Petros Hadjicostas, Oct 03 2019]
Let m > 0 and -3 <= p <= 2 be defined by n = 6*m+p-3; then for n > -3, a(n) = 3*m^2 + p*m, and for n = -3, a(n) = 3*m^2 + p*m + 1. - Floor van Lamoen, Jul 23 2001
72*a(n) = 17 + 6*(n+1)*(n+5) + 9*(-1)^n - 8*A061347(n). - Benoit Cloitre, Feb 09 2003
From Jon Perry, Jun 17 2003: (Start)
a(n) = 6*t(floor(n/6)) + (n%6) * (floor(n/6) + 1) + (n mod 6 == 0?1:0), where t(n) = n*(n+1)/2.
a(n) = ceiling(1/12*n^2 + 1/2*n) + (n mod 6 == 0?1:0).
[Here "n%6" means "n mod 6" while "(n mod 6 == 0?1:0)" means "if n mod 6 == 0 then 1, else 0" (as in C).]
(End)
a(n) = Sum_{i=0..floor(n/3)} 1 + floor((n - 3*i)/2). - Jon Perry, Jun 27 2003
a(n) = Sum_{k=0..n} floor((k + 2)/2) * (cos(2*Pi*(n - k)/3 + Pi/3)/3 + sqrt(3) * sin(2*Pi*(n-k)/3 + Pi/3)/3 + 1/3). - Paul Barry, Apr 16 2005
(m choose 3)_q = (q^m-1) * (q^(m-1) - 1) * (q^(m-2) - 1)/((q^3 - 1) * (q^2 - 1) * (q - 1)).
a(n) = Sum_{k=0..floor(n/2)} floor((3 + n - 2*k)/3). - Paul Barry, Nov 11 2003
A117220(n) = a(A003586(n)). - Reinhard Zumkeller, Mar 04 2006
a(n) = 3 * Sum_{i=2..n+1} floor(i/2) - floor(i/3). - Thomas Wieder, Feb 11 2007
Identical to the number of points inside or on the boundary of the integer grid of {I, J}, bounded by the three straight lines I = 0, I - J = 0 and I + 2J = n. - Jonathan Vos Post, Jul 03 2007
a(n) = A026820(n,3) for n > 2. - Reinhard Zumkeller, Jan 21 2010
Euler transform of length 3 sequence [ 1, 1, 1]. - Michael Somos, Feb 25 2012
a(n) = A005044(2*n + 3) = A005044(2*n + 6). - Michael Somos, Feb 25 2012
a(n) = A000212(n+3) - A002620(n+3). - Richard R. Forberg, Dec 08 2013
a(n) = a(n-1) + a(n-2) - a(n-4) - a(n-5) + a(n-6). - David Neil McGrath, Feb 14 2015
a(n) = floor((n^2+3)/12) + floor((n+2)/2). - Giacomo Guglieri, Apr 02 2019
From Devansh Singh, May 28 2020: (Start)
Let p(n, 3) be the number of 3-part integer partitions in which every part is > 0.
Then for n >= 3, p(n, 3) is equal to:
(n^2 - 1)/12 when n is odd and 3 does not divide n.
(n^2 + 3)/12 when n is odd and 3 divides n.
(n^2 - 4)/12 when n is even and 3 does not divide n.
(n^2)/12 when n is even and 3 divides n.
For n >= 3, p(n, 3) = a(n-3). (End)
a(n) = floor(((n+3)^2 + 4)/12). - Vladimír Modrák, Zuzana Soltysova, Dec 08 2020
Sum_{n>=0} 1/a(n) = 15/4 - Pi/(2*sqrt(3)) + Pi^2/18 + tanh(Pi/(2*sqrt(3)))*Pi/sqrt(3). - Amiram Eldar, Sep 29 2022
E.g.f.: exp(-x)*(9 + exp(2*x)*(47 + 42*x + 6*x^2) + 16*exp(x/2)*cos(sqrt(3)*x/2))/72. - Stefano Spezia, Mar 05 2023
a(6n) = 1+6*A000217(n); Sum_{i=1..n} a(6*i) = A000578(n+1). - David García Herrero, May 05 2024

Extensions

Name edited by Gus Wiseman, Apr 15 2019

A005449 Second pentagonal numbers: a(n) = n*(3*n + 1)/2.

Original entry on oeis.org

0, 2, 7, 15, 26, 40, 57, 77, 100, 126, 155, 187, 222, 260, 301, 345, 392, 442, 495, 551, 610, 672, 737, 805, 876, 950, 1027, 1107, 1190, 1276, 1365, 1457, 1552, 1650, 1751, 1855, 1962, 2072, 2185, 2301, 2420, 2542, 2667, 2795, 2926, 3060, 3197, 3337, 3480
Offset: 0

Views

Author

Keywords

Comments

Number of edges in the join of the complete graph and the cycle graph, both of order n, K_n * C_n. - Roberto E. Martinez II, Jan 07 2002
Also number of cards to build an n-tier house of cards. - Martin Wohlgemuth, Aug 11 2002
The modular form Delta(q) = q*Product_{n>=1} (1-q^n)^24 = q*(1 + Sum_{n>=1} (-1)^n*(q^(n*(3*n-1)/2)+q^(n*(3*n+1)/2)))^24 = q*(1 + Sum_{n>=1} A033999(n)*(q^A000326(n)+q^a(n)))^24. - Jonathan Vos Post, Mar 15 2006
Row sums of triangle A134403.
Bisection of A001318. - Omar E. Pol, Aug 22 2011
Sequence found by reading the line from 0 in the direction 0, 7, ... and the line from 2 in the direction 2, 15, ... in the square spiral whose vertices are the generalized pentagonal numbers, A001318. - Omar E. Pol, Sep 08 2011
A general formula for the n-th second k-gonal number is given by T(n, k) = n*((k-2)*n+k-4)/2, n>=0, k>=5. - Omar E. Pol, Aug 04 2012
Partial sums give A006002. - Denis Borris, Jan 07 2013
A002260 is the following array A read by antidiagonals:
0, 1, 2, 3, 4, 5, ...
0, 1, 2, 3, 4, 5, ...
0, 1, 2, 3, 4, 5, ...
0, 1, 2, 3, 4, 5, ...
0, 1, 2, 3, 4, 5, ...
0, 1, 2, 3, 4, 5, ...
and a(n) is the hook sum: Sum_{k=0..n} A(n,k) + Sum_{r=0..n-1} A(r,n). - R. J. Mathar, Jun 30 2013
From Klaus Purath, May 13 2021: (Start)
This sequence and A000326 provide all integers m such that 24*m + 1 is a square. The union of the two sequences is A001318.
If A is a sequence satisfying the recurrence t(n) = 3*t(n-1) - 2*t(n-2) with the initial values either A(0) = 1, A(1) = n + 2 or A(0) = -1, A(1) = n - 1, then a(n) = (A(i)^2 - A(i-1)*A(i+1))/2^i + n^2 for i>0. (End)
a(n+1) is the number of Dyck paths of size (3,3n+2), i.e., the number of NE lattice paths from (0,0) to (3,3n+2) which stay above the line connecting these points. - Harry Richman, Jul 13 2021
Binomial transform of [0, 2, 3, 0, 0, 0, ...], being a(n) = 2*binomial(n,1) + 3*binomial(n,2). a(3) = 15 = [0, 2, 3, 0] dot [1, 3, 3, 1] = [0 + 6 + 9 + 0]. - Gary W. Adamson, Dec 17 2022
a(n) is the sum of longest side length of all nondegenerate integer-sided triangles with shortest side length n and middle side length (n + 1), n > 0. - Torlach Rush, Feb 04 2024

Examples

			From _Omar E. Pol_, Aug 22 2011: (Start)
Illustration of initial terms:
                                               O
                                             O O
                                 O         O O O
                               O O       O O O O
                     O       O O O     O O O O O
                   O O     O O O O     O O O O O
           O     O O O     O O O O     O O O O O
         O O     O O O     O O O O     O O O O O
    O    O O     O O O     O O O O     O O O O O
    O    O O     O O O     O O O O     O O O O O
    -    ---     -----     -------     ---------
    2     7        15         26           40
(End)
		

References

  • Henri Cohen, A Course in Computational Algebraic Number Theory, vol. 138 of Graduate Texts in Mathematics, Springer-Verlag, 2000.

Crossrefs

Cf. A016789 (first differences), A006002 (partial sums).
The generalized pentagonal numbers b*n+3*n*(n-1)/2, for b = 1 through 12, form sequences A000326, this sequence, A045943, A115067, A140090, A140091, A059845, A140672-A140675, A151542.
Cf. numbers of the form n*(n*k-k+4)/2 listed in A226488 (this sequence is the case k=3).
Cf. numbers of the form n*((2*k+1)*n+1)/2 listed in A022289 (this sequence is the case k=1).

Programs

Formula

a(n) = A110449(n, 1) for n>0.
G.f.: x*(2+x)/(1-x)^3. E.g.f.: exp(x)*(2*x + 3*x^2/2). a(n) = n*(3*n + 1)/2. a(-n) = A000326(n). - Michael Somos, Jul 18 2003
a(n) = A001844(n) - A000217(n+1) = A101164(n+2,2) for n>0. - Reinhard Zumkeller, Dec 03 2004
a(n) = Sum_{j=1..n} n+j. - Zerinvary Lajos, Sep 12 2006
a(n) = A126890(n,n). - Reinhard Zumkeller, Dec 30 2006
a(n) = 2*C(3*n,4)/C(3*n,2), n>=1. - Zerinvary Lajos, Jan 02 2007
a(n) = A000217(n) + A000290(n). - Zak Seidov, Apr 06 2008
a(n) = a(n-1) + 3*n - 1 for n>0, a(0)=0. - Vincenzo Librandi, Nov 18 2010
a(n) = A129267(n+5,n). - Philippe Deléham, Dec 21 2011
a(n) = 2*A000217(n) + A000217(n-1). - Philippe Deléham, Mar 25 2013
a(n) = A130518(3*n+1). - Philippe Deléham, Mar 26 2013
a(n) = (12/(n+2)!)*Sum_{j=0..n} (-1)^(n-j)*binomial(n,j)*j^(n+2). - Vladimir Kruchinin, Jun 04 2013
a(n) = floor(n/(1-exp(-2/(3*n)))) for n>0. - Richard R. Forberg, Jun 22 2013
a(n) = Sum_{i=1..n} (3*i - 1) for n >= 1. - Wesley Ivan Hurt, Oct 11 2013 [Corrected by Rémi Guillaume, Oct 24 2024]
a(n) = (A000292(6*n+k+1)-A000292(k))/(6*n+1) - A000217(3*n+k+1), for any k >= 0. - Manfred Arens, Apr 26 2015
Sum_{n>=1} 1/a(n) = 6 - Pi/sqrt(3) - 3*log(3) = 0.89036376976145307522... . - Vaclav Kotesovec, Apr 27 2016
a(n) = A000217(2*n) - A000217(n). - Bruno Berselli, Sep 21 2016
Sum_{n>=1} (-1)^(n+1)/a(n) = 2*Pi/sqrt(3) + 4*log(2) - 6. - Amiram Eldar, Jan 18 2021
From Klaus Purath, May 13 2021: (Start)
Partial sums of A016789 for n > 0.
a(n) = 3*n^2 - A000326(n).
a(n) = A000326(n) + n.
a(n) = A002378(n) + A000217(n-1) for n >= 1. [Corrected by Rémi Guillaume, Aug 14 2024] (End)
From Klaus Purath, Jul 14 2021: (Start)
b^2 = 24*a(n) + 1 we get by b^2 = (a(n+1) - a(n-1))^2 = (a(2*n)/n)^2.
a(2*n) = n*(a(n+1) - a(n-1)), n > 0.
a(2*n+1) = n*(a(n+1) - a(n)). (End)
A generalization of Lajos' formula, dated Sep 12 2006, follows. Let SP(k,n) = the n-th second k-gonal number. Then SP(2k+1,n) = Sum_{j=1..n} (k-1)*n+j+k-2. - Charlie Marion, Jul 13 2024
a(n) = Sum_{k = 0..3*n} (-1)^(n+k+1) * binomial(k, 2) * binomial(3*n+k, 2*k). - Peter Bala, Nov 03 2024
For integer m, (6*m + 1)^2*a(n) + a(m) = a((6*m+1)*n + m). - Peter Bala, Jan 09 2025

A045991 a(n) = n^3 - n^2.

Original entry on oeis.org

0, 0, 4, 18, 48, 100, 180, 294, 448, 648, 900, 1210, 1584, 2028, 2548, 3150, 3840, 4624, 5508, 6498, 7600, 8820, 10164, 11638, 13248, 15000, 16900, 18954, 21168, 23548, 26100, 28830, 31744, 34848, 38148, 41650, 45360, 49284, 53428, 57798, 62400, 67240, 72324
Offset: 0

Views

Author

Keywords

Comments

Number of edges in the line graph of the complete bipartite graph of order 2n, L(K_n,n). - Roberto E. Martinez II, Jan 07 2002
Number of edges of the Cartesian product of two complete graphs K_n X K_n. - Roberto E. Martinez II, Jan 07 2002
That is, number of edges in the n X n rook graph. - Eric W. Weisstein, Jun 20 2017
n such that x^3 + x^2 + n factors over the integers. - James R. Buddenhagen, Apr 19 2005
Also the number of triangles in a 2 X n grid of points and therefore also (n choose 2) * (n choose 1) * 2, or (2n choose 3) - 2*(n choose 3). - Joshua Zucker, Jan 11 2006
Nonnegative X values of solutions to the equation (X-Y)^3-XY=0. To find Y values: b(n)=(n+1)*n^2 (see A011379). I proved that, if(X,Y) is different from (0,0) and m=2, 4, 6, 8, 10, 12,..., then the equation (X-Y)^m-XY=0,... has no solution. - Mohamed Bouhamida, May 10 2006
For n>=1, a(n) is equal to the number of functions f:{1,2,3}->{1,2,...,n} such that for a fixed x in {1,2,3} and a fixed y in {1,2,...,n} we have f(x)<>y. - Aleksandar M. Janjic and Milan Janjic, Mar 13 2007
a(n) equals the coefficient of log(2) in 2F1(n-1,n-1,n+1,-1). - John M. Campbell, Jul 16 2011
Define the infinite square array m(n,k) = (n-k)^2 for 1<=k<=n below the diagonal and m(n,k) = (k+n)(k-n) for 1<=n<=k above the diagonal. Then a(n) = Sum_{k=1..n} m(n,k) + Sum_{r=1..n} m(r,n), the "hook sum" of the terms left from m(n,n) and above m(n,n). - J. M. Bergot, Aug 16 2013
Partial sums of A049451. - Bruno Berselli, Feb 10 2014
Volume of an extruded rectangular brick with side lengths n, n and n-1. - Luciano Ancora, Jun 24 2015

Crossrefs

Cf. A011379, A047929, A114364 (essentially the same).

Programs

Formula

G.f.: 2*x^2*(x+2)/(-1+x)^4 = 6/(-1+x)^4+10/(-1+x)^2+14/(-1+x)^3+2/(-1+x). - R. J. Mathar, Nov 19 2007
a(n) = floor(n^5/(n^2+n+1)). - Gary Detlefs, Feb 10 2010
a(n) = 4*binomial(n,2) + 6*binomial(n,3). - Gary Detlefs, Mar 25 2012
a(n+1) = 2*A006002(n). - R. J. Mathar, Oct 31 2012
a(n) = (A000217(n-1)+A000217(n))*(A000217(n-1)-A000217(n-2)). - J. M. Bergot, Oct 31 2012
From Wesley Ivan Hurt, May 19 2015: (Start)
a(n) = 4*a(n-1)-6*a(n-2)+4*a(n-3)-a(n-4).
a(n) = Sum_{k=0..n-1} Sum_{i=n-k-1..n+k-1} i. (End)
Sum_{n>=2} 1/a(n) = 2 - Pi^2/6. - Daniel Suteu, Feb 06 2017
Sum_{n>=2} (-1)^n/a(n) = Pi^2/12 + 2*log(2) - 2. - Amiram Eldar, Jul 05 2020
E.g.f.: exp(x)*x^2*(2 + x). - Stefano Spezia, May 20 2021
Product_{n>=2} (1 - 1/a(n)) = A146485. - Amiram Eldar, Nov 22 2022
From J.S. Seneschal, Jun 21 2024: (Start)
a(n) = (n-1)*A000290(n).
a(n) = n*A002378(n-1).
a(n) = A011379(n) - A001105(n). (End)

A049450 Pentagonal numbers multiplied by 2: a(n) = n*(3*n-1).

Original entry on oeis.org

0, 2, 10, 24, 44, 70, 102, 140, 184, 234, 290, 352, 420, 494, 574, 660, 752, 850, 954, 1064, 1180, 1302, 1430, 1564, 1704, 1850, 2002, 2160, 2324, 2494, 2670, 2852, 3040, 3234, 3434, 3640, 3852, 4070, 4294, 4524, 4760, 5002, 5250, 5504, 5764
Offset: 0

Views

Author

Joe Keane (jgk(AT)jgk.org)

Keywords

Comments

From Floor van Lamoen, Jul 21 2001: (Start)
Write 1,2,3,4,... in a hexagonal spiral around 0, then a(n) is the sequence found by reading the line from 0 in the direction 0,2,.... The spiral begins:
.
56--55--54--53--52
/ \
57 33--32--31--30 51
/ / \ \
58 34 16--15--14 29 50
/ / / \ \ \
59 35 17 5---4 13 28 49
/ / / / \ \ \ \
60 36 18 6 0 3 12 27 48
/ / / / / . / / / /
61 37 19 7 1---2 11 26 47
\ \ \ \ . / / /
62 38 20 8---9--10 25 46
\ \ \ . / /
63 39 21--22--23--24 45
\ \ . /
64 40--41--42--43--44
\ .
65--66--67--68--69--70
(End)
Starting with offset 1 = binomial transform of [2, 8, 6, 0, 0, 0, ...]. - Gary W. Adamson, Jan 09 2009
Number of possible pawn moves on an (n+1) X (n+1) chessboard (n=>3). - Johannes W. Meijer, Feb 04 2010
a(n) = A069905(6n-1): Number of partitions of 6*n-1 into 3 parts. - Adi Dani, Jun 04 2011
Even octagonal numbers divided by 4. - Omar E. Pol, Aug 19 2011
Partial sums give A011379. - Omar E. Pol, Jan 12 2013
First differences are A016933; second differences equal 6. - Bob Selcoe, Apr 02 2015
For n >= 1, the continued fraction expansion of sqrt(27*a(n)) is [9n-2; {2, 2n-1, 6, 2n-1, 2, 18n-4}]. - Magus K. Chu, Oct 13 2022

Examples

			On a 4 X 4 chessboard pawns at the second row have (3+4+4+3) moves and pawns at the third row have (2+3+3+2) moves so a(3) = 24. - _Johannes W. Meijer_, Feb 04 2010
From _Adi Dani_, Jun 04 2011: (Start)
a(1)=2: the partitions of 6*1-1=5 into 3 parts are [1,1,3] and[1,2,2].
a(2)=10: the partitions of 6*2-1=11 into 3 parts are [1,1,9], [1,2,8], [1,3,7], [1,4,6], [1,5,5], [2,2,7], [2,3,6], [2,4,5], [3,3,5], and [3,4,4].
(End)
.
.                                                         o
.                                                       o o o
.                                      o              o o o o o
.                                    o o o          o o o o o o o
.                       o          o o o o o      o o o o o o o o o
.                     o o o      o o o o o o o    o o o o o o o o o
.            o      o o o o o    o o o o o o o    o o o o o o o o o
.          o o o    o o o o o    o o o o o o o    o o o o o o o o o
.    o     o o o    o o o o o    o o o o o o o    o o o o o o o o o
.    o     o o o    o o o o o    o o o o o o o    o o o o o o o o o
.    2      10         24             44                 70
- _Philippe Deléham_, Mar 30 2013
		

Crossrefs

Cf. A000567.
Bisection of A001859. Cf. A045944, A000326, A033579, A027599, A049451.
Cf. A033586 (King), A035005 (Queen), A035006 (Rook), A035008 (Knight) and A002492 (Bishop).
Cf. numbers of the form n*(n*k-k+4)/2 listed in A226488. [Bruno Berselli, Jun 10 2013]
Cf. sequences listed in A254963.

Programs

  • GAP
    List([0..50], n-> n*(3*n-1)); # G. C. Greubel, Aug 31 2019
  • Magma
    [n*(3*n-1) : n in [0..50]]; // Wesley Ivan Hurt, Sep 24 2017
    
  • Maple
    seq(n*(3*n-1),n=0..44); # Zerinvary Lajos, Jun 12 2007
  • Mathematica
    Table[n(3n-1),{n,0,50}] (* or *) LinearRecurrence[{3,-3,1},{0,2,10},50] (* Harvey P. Dale, Jun 21 2014 *)
    2*PolygonalNumber[5,Range[0,50]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jun 01 2018 *)
  • PARI
    a(n)=n*(3*n-1) \\ Charles R Greathouse IV, Nov 20 2012
    
  • Sage
    [n*(3*n-1) for n in (0..50)] # G. C. Greubel, Aug 31 2019
    

Formula

O.g.f.: A(x) = 2*x*(1+2*x)/(1-x)^3.
a(n) = A049452(n) - A033428(n). - Zerinvary Lajos, Jun 12 2007
a(n) = 2*A000326(n), twice pentagonal numbers. - Omar E. Pol, May 14 2008
a(n) = A022264(n) - A000217(n). - Reinhard Zumkeller, Oct 09 2008
a(n) = a(n-1) + 6*n - 4 (with a(0)=0). - Vincenzo Librandi, Aug 06 2010
a(n) = A014642(n)/4 = A033579(n)/2. - Omar E. Pol, Aug 19 2011
a(n) = A000290(n) + A000384(n) = A000217(n) + A000566(n). - Omar E. Pol, Jan 11 2013
a(n+1) = A014107(n+2) + A000290(n). - Philippe Deléham, Mar 30 2013
E.g.f.: x*(2 + 3*x)*exp(x). - Vincenzo Librandi, Apr 28 2016
a(n) = (2/3)*A000217(3*n-1). - Bruno Berselli, Feb 13 2017
a(n) = A002061(n) + A056220(n). - Bruce J. Nicholson, Sep 21 2017
From Amiram Eldar, Feb 20 2022: (Start)
Sum_{n>=1} 1/a(n) = 3*log(3)/2 - Pi/(2*sqrt(3)).
Sum_{n>=1} (-1)^(n+1)/a(n) = Pi/sqrt(3) - 2*log(2). (End)
From Leo Tavares, Feb 23 2022: (Start)
a(n) = A003215(n) - A016813(n).
a(n) = 2*A000290(n) + 2*A000217(n-1). (End)

A006578 Triangular numbers plus quarter squares: n*(n+1)/2 + floor(n^2/4) (i.e., A000217(n) + A002620(n)).

Original entry on oeis.org

0, 1, 4, 8, 14, 21, 30, 40, 52, 65, 80, 96, 114, 133, 154, 176, 200, 225, 252, 280, 310, 341, 374, 408, 444, 481, 520, 560, 602, 645, 690, 736, 784, 833, 884, 936, 990, 1045, 1102, 1160, 1220, 1281, 1344, 1408, 1474, 1541, 1610, 1680, 1752, 1825, 1900, 1976, 2054
Offset: 0

Views

Author

Keywords

Comments

Equals (1, 2, 3, 4, ...) convolved with (1, 2, 1, 2, ...). a(4) = 14 = (1, 2, 3, 4) dot (2, 1, 2, 1) = (2 + 2 + 6 + 4). - Gary W. Adamson, May 01 2009
We observe that is the transform of A032766 by the following transform T: T(u_0,u_1,u_2,u_3,...) = (u_0, u_0+u_1, u_0+u_1+u_2, u_0+u_1+u_2+u_3+u_4,...). In other words, v_p = Sum_{k=0..p} u_k and the g.f. phi_v of is given by phi_v = phi_u/(1-z). - Richard Choulet, Jan 28 2010
Equals row sums of a triangle with (1, 4, 7, 10, ...) in every column, shifted down twice for columns > 1. - Gary W. Adamson, Mar 03 2010
Number of pairs (x,y) with x in {0,...,n}, y odd in {0,...,2n}, and x < y. - Clark Kimberling, Jul 02 2012
Also A049451 and positives A000567 interleaved. - Omar E. Pol, Aug 03 2012
Similar to A001082. Members of this family are A093005, A210977, this sequence, A210978, A181995, A210981, A210982. - Omar E. Pol, Aug 09 2012

Examples

			G.f. = x + 4*x^2 + 8*x^3 + 14*x^4 + 21*x^5 + 30*x^6 + 40*x^7 + 52*x^8 + 65*x^9 + ...
		

References

  • Marc LeBrun, personal communication.
  • N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).

Crossrefs

Row sums of A104567.
Cf. A051125.

Programs

  • Magma
    [(6*n^2+4*n-1+(-1)^n)/8: n in [0..50] ]; // Vincenzo Librandi, Aug 20 2011
  • Maple
    with (combinat): seq(count(Partition((3*n+1)), size=3), n=0..52); # Zerinvary Lajos, Mar 28 2008
    # 2nd program
    A006578 := proc(n)
        (6*n^2 + 4*n - 1 + (-1)^n)/8 ;
    end proc: # R. J. Mathar, Apr 28 2017
  • Mathematica
    Accumulate[LinearRecurrence[{1,1,-1}, {0,1,3}, 100]] (* Harvey P. Dale, Sep 29 2013 *)
    a[ n_] := Quotient[n + 1, 2] (Quotient[n, 2] 3 + 1); (* Michael Somos, Jun 09 2014 *)
    a[ n_] := Quotient[3 (n + 1)^2 + 1, 4] - (n + 1); (* Michael Somos, Jun 10 2015 *)
    LinearRecurrence[{2, 0, -2, 1},{0, 1, 4, 8},53] (* Ray Chandler, Aug 03 2015 *)
  • PARI
    {a(n) = (3*(n+1)^2 + 1)\4 - n - 1}; /* Michael Somos, Mar 10 2006 */
    

Formula

Expansion of x*(1+2*x) / ((1-x)^2*(1-x^2)). - Simon Plouffe in his 1992 dissertation
a(n) + A002620(n) = A002378(n) = n*(n+1).
Partial sums of A032766. - Paul Barry, May 30 2003
a(n) = a(n-1) + a(n-2) - a(n-3) + 3 = A002620(n) + A004526(n) = A001859(n) - A004526(n+1). - Henry Bottomley, Mar 08 2000
a(n) = (6*n^2 + 4*n - 1 + (-1)^n)/8. - Paul Barry, May 30 2003
a(n) = A001859(-1-n) for all n in Z. - Michael Somos, May 10 2006
a(n) = (A002378(n)/2 + A035608(n))/2. - Reinhard Zumkeller, Feb 07 2010
a(n) = (3*n^2 + 2*n - (n mod 2))/4. - Ctibor O. Zizka, Mar 11 2012
a(n) = Sum_{i=1..n} floor(3*i/2) = Sum_{i=0..n} (i + floor(i/2)). - Enrique Pérez Herrero, Apr 21 2012
a(n) = 3*n*(n+1)/2 - A001859(n). - Clark Kimberling, Jul 02 2012
a(n) = Sum_{i=1..n} (n - i + 1) * 2^( (i+1) mod 2 ). - Wesley Ivan Hurt, Mar 30 2014
a(n) = A002717(n) - A002717(n-1). - Michael Somos, Jun 09 2014
a(n) = Sum_{k=1..n} floor((n+k+1)/2). - Wesley Ivan Hurt, Mar 31 2017
a(n) = A002620(n+1)+2*A002620(n). - R. J. Mathar, Apr 28 2017
Sum_{n>=1} 1/a(n) = 3 - Pi/(4*sqrt(3)) - 3*log(3)/4. - Amiram Eldar, May 28 2022
E.g.f.: (x*(5 + 3*x)*cosh(x) - (1 - 5*x - 3*x^2)*sinh(x))/4. - Stefano Spezia, Aug 22 2023

Extensions

Offset and description changed by N. J. A. Sloane, Nov 30 2006

A007980 Expansion of (1+x^2)/((1-x)^2*(1-x^3)).

Original entry on oeis.org

1, 2, 4, 7, 10, 14, 19, 24, 30, 37, 44, 52, 61, 70, 80, 91, 102, 114, 127, 140, 154, 169, 184, 200, 217, 234, 252, 271, 290, 310, 331, 352, 374, 397, 420, 444, 469, 494, 520, 547, 574, 602, 631, 660, 690, 721, 752, 784, 817, 850, 884, 919, 954, 990, 1027, 1064
Offset: 0

Views

Author

Keywords

Comments

Molien series for ternary self-dual codes over GF(3) of length 12n containing 11...1.
(1+x)*(1+x^2) / ((1-x)*(1-x^2)*(1-x^3)) is the Poincaré series [or Poincare series] (or Molien series) for H^*(O_3(q); F_2).
a(n) is the position of the n-th triangular number in the running sum of the (pseudo-Orloj) sequence 1,2,1,2,1,2,1...., cf. A028355. - Wouter Meeussen, Mar 10 2002
a(n) = [a(n-1) + (number of even terms so far in the sequence)]. Example: 14 is [10 + 4 even terms so far in the sequence (they are 0,2,4,10)]. See A096777 for the same construction with odd integers. - Eric Angelini, Aug 05 2007
The number of partitions of 2*n into at most 3 parts. - Colin Barker, Mar 31 2015
Also a(n) equals the number of linearly-independent terms at 2n-th order in the power series expansion of a trigonal Rotational Energy Surface. An optimal basis for the expansion follows either decomposition: g1(x) = (1+x)(1+x^2)g2(x) or g1(x) = (1+x^2)x^(-1)g3(x), where g1(x), g2(x), g3(x) are the generating functions for sequences A007980, A001399, A001840. - Bradley Klee, Aug 06 2015
Also a(n) equals the number of linearly-independent terms at 4n-th order in the power series expansion of the symmetrized weight enumerator of a self-dual code of length n over Z4 that contains a vector (+/-)1^n and has all norms divisible by 8. An optimal basis for the expansion follows the decomposition: g1(x) = (1+x)(1+x^2)g2(x) where g1(x), g2(x) are the generating functions for sequences A007980, A001399. (Cf. Calderbank and Sloane, Corollary 5.) - Bradley Klee, Aug 06 2015
Also, a(n) is equal to the number of partitions of 2n+3 of length 3. Letting n=4, there are a(4)=10 partitions of 2n+3=11 of length 3: (9,1,1), (8,2,1), (7,3,1), (7,2,2), (6,4,1), (6,3,2), (5,5,1), (5,4,2), (5,3,3), (4,4,3). - John M. Campbell, Jan 30 2016
a(n) is the number of partitions of n into parts 1 (of two kinds), part 2 (occurring at most once), and parts 3. - Joerg Arndt, Oct 12 2020
Conjecture: a(n) is the maximum number of pieces a triangle can be cut into by n cevians. - Anton Zakharov, Apr 04 2017
Also, a(n) is the number of graphs which are double-triangle descendants of K_5 with n+6 triangles and 3 more vertices than triangles. See Laradji/Mishna/Yeats reference, proposition 3.6 for details. - Karen A. Yeats, Feb 21 2020

Examples

			G.f. = 1 + 2*x + 4*x^2 + 7*x^3 + 10*x^4 + 14*x^5 + 19*x^6 + 24*x^7 + ...
		

References

  • A. Adem and R. J. Milgram, Cohomology of Finite Groups, Springer-Verlag, 2nd. ed., 2004; p. 233.

Crossrefs

Programs

  • Maple
    with (combinat):seq(count(Partition((2*n+1)), size=3), n=1..56); # Zerinvary Lajos, Mar 28 2008
  • Mathematica
    Table[Ceiling[n (n+1)/3], {n, 56}]
    CoefficientList[Series[(1+x^2)/((1-x)^2*(1-x^3)),{x,0,60}],x] (* Vincenzo Librandi, Feb 25 2012 *)
    a[ n_] := Quotient[ n^2, 3] + n + 1; (* Michael Somos, Aug 23 2015 *)
    LinearRecurrence[{2,-1,1,-2,1},{1,2,4,7,10},60] (* Harvey P. Dale, Aug 24 2016 *)
  • PARI
    {a(n) = if( n<-1, a(-3-n), polcoeff( (1 + x^2) / ( (1 - x)^2 * (1 - x^3)) + x*O(x^n), n))}; /* Michael Somos, Jun 07 2003 */
    
  • PARI
    {a(n) = n^2\3 + n+1}; /* Michael Somos, Aug 23 2015 */
    
  • PARI
    a(n) = #partitions(2*n, ,[1,3]); \\ Michel Marcus, Feb 12 2016
    
  • PARI
    a(n) = #partitions(2*n+3, ,[3,3]); \\ Michel Marcus, Feb 12 2016

Formula

G.f.: (1 + x^2) / ((1 - x)^2 * (1 - x^3)). - Michael Somos, Jun 07 2003
a(n) = a(n-1) + a(n-3) -a(n-4) + 2 = a(-3-n) for all n in Z. - Michael Somos, Jun 07 2003
a(n) = ceiling((n+1)*(n+2)/3). - Paul Boddington, Jan 26 2004
a(n) = A192736(n+1) / (n+1). - Reinhard Zumkeller, Jul 08 2011
From Bruno Berselli, Oct 22 2010: (Start)
a(n) = ((n+1)*(n+2)+(2*cos(2*Pi*n/3)+1)/3)/3 = Sum_{i=1..n+1} A004396(i).
a(n) = 2*a(n-1) - a(n-2) + a(n-3) - 2*a(n-4) + a(n-5) for n>4.
a(n) = A002378(n+1)/3 if 3 divides A002378(n+1), a(n) = (A002378(n)+1)/3 otherwise. (End)
a(n) = A001840(n+1) + A001840(n-1). - R. J. Mathar, Aug 23 2015
From Michael Somos, Aug 23 2015: (Start)
Euler transform of length 4 sequence [2, 1, 1, -1].
a(n) = A001399(2*n) = A008796(2*n) = A008796(2*n + 3) = A069905(2*n + 3) = A211540(2*n + 5).
a(2*n) = A238705(n+1).
a(3*n - 1) = A049451(n).
a(3*n) = A003215(n).
a(3*n + 1) = A049450(n+1).
2*a(3*n - 1) = A005449(n).
2*a(3*n + 1) = A000326(n+1).
a(n+1) - a(n) = A004396(n+2). (End)
a(n) = floor((n^2+3*n+3)/3). - Giacomo Guglieri, May 01 2019
a(n) = A000212(n) + n+1. - Yuchun Ji, Oct 12 2020
Sum_{n>=0} 1/a(n) = (tanh(Pi/(2*sqrt(3)))-1)*Pi/sqrt(3) + 3. - Amiram Eldar, May 20 2023

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

Views

Author

Keywords

Comments

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

Crossrefs

Programs

Formula

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

A152749 a(n) = (n+1)*(3*n+1)/4 for n odd, a(n) = n*(3*n+2)/4 for n even.

Original entry on oeis.org

0, 2, 4, 10, 14, 24, 30, 44, 52, 70, 80, 102, 114, 140, 154, 184, 200, 234, 252, 290, 310, 352, 374, 420, 444, 494, 520, 574, 602, 660, 690, 752, 784, 850, 884, 954, 990, 1064, 1102, 1180, 1220, 1302, 1344, 1430, 1474, 1564, 1610, 1704, 1752, 1850, 1900, 2002
Offset: 0

Views

Author

Vincenzo Librandi, Dec 31 2009

Keywords

Comments

Interleaving of A049450 and A049451 (for n > 0).
Also, integer values of k*(k+1)/3. - Charles R Greathouse IV, Dec 11 2010
The nonzero coefficients of the expansion of f(a) = Product_{k>=1} (1-a^(2k)), see A194159, occur at the terms of the sequence given above, i.e., f(a) = 1 - a^2 - a^4 + a^10 + a^14 - a^24 - a^30 + a^44 + a^52 - a^70 - a^80 + ... = Sum_{n>=0} (-1)^binomial(n+1,2)*a^A152749(n). - Johannes W. Meijer, Aug 21 2011
Partial sums of A109043. - Reinhard Zumkeller, Mar 31 2012
Nonnegative k such that 12*k+1 is a square. - Vicente Izquierdo Gomez, Jul 22 2013
Equivalently, numbers of the form h*(3*h+1), where h = 0, -1, 1, -2, 2, -3, 3, -4, 4, ... (see also the fifth comment of A062717). - Bruno Berselli, Feb 02 2017
For n > 0, a(n-1) is the sum of the largest parts of the partitions of 2n into two even parts. - Wesley Ivan Hurt, Dec 19 2017
The sequence terms occur as exponents in the expansion of Sum_{n >= 0} q^(n*(n+1)/2) * Product_{k >= n+1} 1 - q^k = 1 - q^2 - q^4 + q^10 + q^14 - q^24 - q^30 + + - - .... - Peter Bala, Dec 15 2024
Sequence terms occur as exponents in the expansions of Sum_{n >= 0} q^(n*(2*n+1)) * Product_{k >= 2*n+2} 1 - q^k = Sum_{n >= 0} q^(n*(2*n-1)) * Product_{k >= 2*n+1} 1 - q^k = 1 - q^2 - q^4 + q^10 + q^14 - q^24 - q^30 + + - - .... - Peter Bala, Jun 23 2025

Crossrefs

Cf. A049450 (n*(3*n-1)), A049451 (n*(3*n+1)), A153383 (12n+1 is not prime).

Programs

  • Haskell
    a152749 n = a152749_list !! (n-1)
    a152749_list = scanl1 (+) a109043_list
    -- Reinhard Zumkeller, Mar 31 2012
  • Magma
    [IsOdd(n) select (n+1)*(3*n+1)/4 else n*(3*n+2)/4: n in [0..52]];
    
  • Magma
    f:=func; [0] cat [f(n*m): m in [-1,1], n in [1..30]]; // Bruno Berselli, Nov 13 2012
    
  • Maple
    A152749 := proc(n): if type(n,even) then n*(3*n+2)/4  else (n+1)*(3*n+1)/4 fi: end: seq(A152749(n), n=0..51); # Johannes W. Meijer, Aug 21 2011
  • Mathematica
    Table[If[OddQ[n],(n+1)*(3*n+1)/4,n*(3*n+2)/4],{n,0,60}] (* Vladimir Joseph Stephan Orlovsky, Feb 03 2012 *)
    LinearRecurrence[{1,2,-2,-1,1}, {0, 2, 4, 10, 14}, 50] (* Vincenzo Librandi, Feb 22 2012 *)
    Select[Range[1,1000], IntegerQ[Sqrt[12#+1]]&] (* Vicente Izquierdo Gomez, Jul 22 2013 *)

Formula

From R. J. Mathar, Jan 03-06 2009: (Start)
G.f.: 2*x*(1+x+x^2)/((1+x)^2*(1-x)^3).
a(n) = a(n-1) + 2*a(n-2) - 2*a(n-3) - a(n-4) + a(n-5) = A003154(n+1)/8 - (-1)^n*A005408(n)/8.
a(n) = 2*A001318(n) = ((6*n^2+6*n+1) - (2*n+1)*(-1)^n)/8. (End)
From Amiram Eldar, Mar 15 2022: (Start)
Sum_{n>=1} 1/a(n) = 3 - Pi/sqrt(3).
Sum_{n>=1} (-1)^(n+1)/a(n) = 3*(log(3)-1). (End)

Extensions

Edited, typo corrected and extended by Klaus Brockhaus, Jan 02 2009
Leading term a(0)=0 added by Johannes W. Meijer, Aug 21 2011

A174709 Partial sums of floor(n/6).

Original entry on oeis.org

0, 0, 0, 0, 0, 0, 1, 2, 3, 4, 5, 6, 8, 10, 12, 14, 16, 18, 21, 24, 27, 30, 33, 36, 40, 44, 48, 52, 56, 60, 65, 70, 75, 80, 85, 90, 96, 102, 108, 114, 120, 126, 133, 140, 147, 154, 161, 168, 176, 184, 192
Offset: 0

Views

Author

Mircea Merca, Nov 30 2010

Keywords

Comments

Partial sums of A152467.

Examples

			a(7) = floor(0/6) + floor(1/6) + floor(2/6) + floor(3/6) + floor(4/6) + floor(5/6) + floor(6/6) + floor(7/6) = 0 + 0 + 0 + 0 + 0 + 0 + 1 + 1 = 2.
		

Crossrefs

Programs

Formula

a(n) = round(n*(n-4)/12) = round((2*n^2 - 8*n - 1)/24).
a(n) = floor((n-2)^2/12).
a(n) = ceiling((n+1)*(n-5)/12).
a(n) = a(n-6) + n - 5, n > 5.
From R. J. Mathar, Nov 30 2010: (Start)
a(n) = 2*a(n-1) - a(n-2) + a(n-6) - 2*a(n-7) + a(n-8).
G.f.: -x^6 / ( (1+x)*(x^2-x+1)*(1+x+x^2)*(x-1)^3 ).
a(n) = -n/3 + 5/72 + n^2/12 + (-1)^n/24 + A057079(n+5)/6 + A061347(n)/18. (End)
a(6n) = A000567(n), a(6n+1) = 2*A000326(n), a(6n+2) = A033428(n), a(6n+3) = A049451(n), a(6n+4) = A045944(n), a(6n+5) = A028896(n). - Philippe Deléham, Mar 26 2013
a(n) = A008724(n-2). - R. J. Mathar, Jul 10 2015
Sum_{n>=6} 1/a(n) = Pi^2/18 - Pi/(2*sqrt(3)) + 49/12. - Amiram Eldar, Aug 13 2022

A200553 T(n,k)=Number of -k..k arrays x(0..n+1) of n+2 elements with zero sum and nonzero second differences.

Original entry on oeis.org

4, 14, 14, 30, 76, 26, 52, 200, 280, 72, 80, 446, 1184, 1240, 142, 114, 836, 3396, 7254, 4978, 362, 154, 1368, 7778, 26850, 43698, 21626, 778, 200, 2134, 15476, 75792, 211374, 266812, 91058, 1938, 252, 3140, 27806, 178834, 737460, 1689732, 1639804
Offset: 1

Views

Author

R. H. Hardin Nov 19 2011

Keywords

Comments

Table starts
.....4......14........30.........52..........80..........114...........154
....14......76.......200........446.........836.........1368..........2134
....26.....280......1184.......3396........7778........15476.........27806
....72....1240......7254......26850.......75792.......178834........372150
...142....4978.....43698.....211374......737460......2076774.......5012084
...362...21626....266812....1689732.....7286542.....24378976......68263780
...778...91058...1639804...13587804....72366820....288237528.....936121220
..1938..393660..10152636..109957140...723237026...3427837106...12911643944
..4366.1686980..63132188..893510530..7258296910..40950125796..178893425570
.10628.7309386.394016210.7288331916.73127883596.491063998130.2488110363432

Examples

			Some solutions for n=4 k=3
..1....1...-1....1...-1...-3...-1...-1....2....3....3...-3...-2....1....0...-3
..1...-1...-3...-2....1...-3...-3....1...-3....2...-2....2....1...-1....0....3
.-1...-2....3....3....0....0....2....2....1...-3....0....2....1....0....2....2
..0....2...-3...-1....0....0....1....2...-2...-3...-3...-2....2...-2...-3...-2
.-3...-3....1...-3...-2....3....2...-3....3....0...-1...-1...-3....1....1....0
..2....3....3....2....2....3...-1...-1...-1....1....3....2....1....1....0....0
		

Crossrefs

Row 1 is A049451
Showing 1-10 of 31 results. Next