login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A069905 Number of partitions of n into 3 positive parts. 80

%I #135 Jan 02 2024 09:36:10

%S 0,0,0,1,1,2,3,4,5,7,8,10,12,14,16,19,21,24,27,30,33,37,40,44,48,52,

%T 56,61,65,70,75,80,85,91,96,102,108,114,120,127,133,140,147,154,161,

%U 169,176,184,192,200,208,217,225,234,243,252,261,271,280,290,300,310,320,331,341

%N Number of partitions of n into 3 positive parts.

%C Number of binary bracelets of n beads, 3 of them 0. For n >= 3, a(n-3) is the number of binary bracelets of n beads, 3 of them 0, with 00 prohibited. - _Washington Bomfim_, Aug 27 2008

%C Also number of partitions of n-3 into parts 1, 2, and 3. - _Joerg Arndt_, Sep 05 2013

%C Number of incongruent triangles with integer sides that have perimeter 2n-3 (see the Jordan et al. link). - _Freddy Barrera_, Aug 18 2018

%C Number of ordered triples (x,y,z) of nonnegative integers such that x+y+z=n and x<y<z. A one-to-one correspondence between the ordered triples (x,y,z) defined above and the partitions (a,b,c) of n into 3 positive parts is shown by letting x=a-1 and letting z=c+1. - _Dennis P. Walsh_, Apr 19 2019

%C Number of incongruent triangles formed from any 3 vertices of a regular n-gon. - _Frank M Jackson_, Sep 11 2022

%C Also a(n-3) for n > 2, otherwise 0 is the number of incongruent scalene triangles formed from the vertices of a regular n-gon. - _Frank M Jackson_, Nov 27 2022

%D Ross Honsberger, Mathematical Gems III, Math. Assoc. Amer., 1985, p. 39.

%D Donald E. Knuth, The Art of Computer Programming, vol. 4A, Combinatorial Algorithms, Section 7.2.1.4, p. 410.

%D Donald E. Knuth, The Art of Computer Programming, vol. 4,fascicle 3, Generating All Combinations and Partitions, Section 7.2.1.4., p. 56, exercise 31.

%H Washington Bomfim, <a href="/A069905/b069905.txt">Table of n, a(n) for n = 0..10000</a>

%H Roland Bacher and P. De La Harpe, <a href="https://hal.archives-ouvertes.fr/hal-01285685">Conjugacy growth series of some infinitely generated groups</a>, hal-01285685v2, 2016.

%H Nick Fischer and Christian Ikenmeyer, <a href="https://arxiv.org/abs/2002.00788">The Computational Complexity of Plethysm Coefficients</a>, arXiv:2002.00788 [cs.CC], 2020.

%H Ross Honsberger, <a href="/A005044/a005044_1.pdf">Mathematical Gems III</a>, Math. Assoc. Amer., 1985, p. 39. [Annotated scanned copy]

%H J. H. Jordan, R. Walch and R. J. Wisner, <a href="http://www.jstor.org/stable/2321300">Triangles with integer sides</a>, Amer. Math. Monthly, 86 (1979), 686-689.

%H <a href="/index/Rec#order_06">Index entries for linear recurrences with constant coefficients</a>, signature (1,1,0,-1,-1,1).

%F G.f.: x^3/((1-x)*(1-x^2)*(1-x^3)) = x^3/((1-x)^3*(1+x+x^2)*(1+x)).

%F a(n) = round(n^2/12).

%F a(n) = floor((n^2+6)/12). - _Washington Bomfim_, Jul 03 2012

%F a(-n) = a(n). - _Michael Somos_, Sep 04 2013

%F a(n) = a(n-1) + A008615(n-1) for n > 0. - _Reinhard Zumkeller_, Apr 28 2014

%F Let n = 6k + m. Then a(n) = n^2/12 + a(m) - m^2/12. Also, a(n) = 3*k^2 + m*k + a(m). Example: a(35) = a(6*5 + 5) = 35^2/12 + a(5) - 5^2/12 = 102 = 3*5^2 + 5*5 + a(5). - _Gregory L. Simay_, Oct 13 2015

%F a(n) = a(n-1) +a(n-2) -a(n-4) -a(n-5) +a(n-6), n>5. - _Wesley Ivan Hurt_, Oct 16 2015

%F a(n) = A008284(n,3). - _Robert A. Russell_, May 13 2018

%F a(n) = A005044(2*n) = A005044(2*n - 3). - _Freddy Barrera_, Aug 18 2018

%F a(n) = floor((n^2+k)/12) for all integers k such that 3 <= k <= 7. - _Giacomo Guglieri_, Apr 03 2019

%F From _Wesley Ivan Hurt_, Apr 19 2019: (Start)

%F a(n) = Sum_{k=1..floor(n/3)} Sum_{i=k..floor((n-k)/2)} 1.

%F a(n) = Sum_{i=1..floor(n/3)} floor((n-i)/2) - i + 1. (End)

%F Sum_{n>=3} 1/a(n) = 15/4 + Pi^2/18 - Pi/(2*sqrt(3)) + tanh(Pi/(2*sqrt(3))) * Pi/sqrt(3). - _Amiram Eldar_, Sep 27 2022

%F E.g.f.: (8*exp(-x/2)*cos(sqrt(3)*x/2) + (3*x^2 + 3*x - 8)*cosh(x) + (3*x^2 + 3*x + 1)*sinh(x))/36. - _Stefano Spezia_, Apr 05 2023

%e G.f. = x^3 + x^4 + 2*x^5 + 3*x^6 + 4*x^7 + 5*x^8 + 7*x^9 + 8*x^10 + 10*x^11 + ...

%p A069905 := n->round(n^2/12): seq(A069905(n), n=0..70);

%t a[ n_]:= Round[ n^2 / 12] (* _Michael Somos_, Sep 04 2013 *)

%t CoefficientList[Series[x^3/((1-x)(1-x^2)(1-x^3)), {x, 0, 70}], x] (* _Vincenzo Librandi_, Oct 14 2015 *)

%t Drop[LinearRecurrence[{1,1,0,-1,-1,1}, Append[Table[0,{5}],1],70],2] (* _Robert A. Russell_, May 17 2018 *)

%o (PARI) a(n) = floor((n^2+6)/12); /* _Washington Bomfim_, Jul 03 2012 */

%o (Haskell)

%o a069905 n = a069905_list !! n

%o a069905_list = scanl (+) 0 a008615_list

%o -- _Reinhard Zumkeller_, Apr 28 2014

%o (Magma) [(n^2+6) div 12: n in [0..70]]; // _Vincenzo Librandi_, Oct 14 2015

%o (PARI) my(x='x+O('x^70)); concat([0, 0, 0], Vec(x^3/((1-x)*(1-x^2)*(1-x^3)))) \\ _Altug Alkan_, Oct 14 2015

%o (GAP) List([0..70],n->NrPartitions(n,3)); # _Muniru A Asiru_, May 17 2018

%o (SageMath) [round(n^2/12) for n in range(70)] # _G. C. Greubel_, Apr 03 2019

%Y Another version of A001399, which is the main entry for this sequence.

%Y Cf. A005044, A008284, A008615, A026810 (4 positive parts).

%K nonn,easy

%O 0,6

%A _N. J. A. Sloane_, May 04 2002

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 19 04:26 EDT 2024. Contains 370952 sequences. (Running on oeis4.)