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

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A035538 Number of partitions of n with equal nonzero number of parts congruent to each of 0 and 2 (mod 3) 0
 0, 0, 0, 0, 0, 1, 1, 1, 3, 4, 5, 8, 11, 14, 19, 26, 34, 43, 56, 72, 90, 114, 145, 178, 222, 277, 338, 414, 511, 619, 751, 913, 1101, 1324, 1595, 1909, 2282, 2724, 3243, 3850, 4569, 5406, 6387, 7530, 8869, 10423, 12231, 14332, 16775, 19591, 22864, 26643, 31000 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,9 LINKS Table of n, a(n) for n=0..52. 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[[3]]]; a[n_] := Select[IntegerPartitions[n], equalQ] // Length; a[0] = 0; Table[an = a[n]; Print["a(", n, ") = ", an]; an, {n, 0, 52}] (* Jean-François Alcover, Dec 07 2016 *) CROSSREFS Sequence in context: A047599 A332414 A050846 * A039881 A364652 A035113 Adjacent sequences: A035535 A035536 A035537 * A035539 A035540 A035541 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 | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified November 30 21:14 EST 2023. Contains 367462 sequences. (Running on oeis4.)