login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A035537 Number of partitions of n with equal nonzero number of parts congruent to each of 0 and 1 (mod 3). 0
0, 0, 0, 0, 1, 0, 1, 2, 2, 3, 5, 5, 9, 10, 15, 18, 24, 30, 40, 47, 65, 76, 97, 120, 150, 179, 229, 270, 336, 404, 494, 588, 722, 852, 1035, 1227, 1476, 1744, 2090, 2461, 2935, 3446, 4092, 4795, 5665, 6627, 7801, 9096, 10680, 12426, 14528, 16881, 19680, 22800, 26525 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,8

LINKS

Table of n, a(n) for n=0..54.

MATHEMATICA

equalQ[partit_] := With[{t = Total[Switch[Mod[#, 3], 0, {1, 0, 0}, 1, {0, 1, 0}, 2, {0, 0, 1}]& /@ partit]}, t[[1]] > 0 && t[[1]] == t[[2]]]; a[n_] := Select[IntegerPartitions[n], equalQ] // Length; a[0] = 0; Table[an = a[n]; Print["a(", n, ") = ", an]; an, {n, 0, 54}] (* Jean-François Alcover, Dec 07 2016 *)

CROSSREFS

Sequence in context: A011971 A060048 A110699 * A285407 A292802 A247376

Adjacent sequences:  A035534 A035535 A035536 * A035538 A035539 A035540

KEYWORD

nonn

AUTHOR

Olivier Gérard

STATUS

approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified November 17 12:39 EST 2018. Contains 317276 sequences. (Running on oeis4.)