The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A138136 Triangle read by rows: row n lists the parts > 1 of the last section of the set of partitions of n. 9
 0, 2, 3, 4, 2, 2, 5, 3, 2, 6, 4, 2, 3, 3, 2, 2, 2, 7, 5, 2, 4, 3, 3, 2, 2, 8, 6, 2, 5, 3, 4, 4, 4, 2, 2, 3, 3, 2, 2, 2, 2, 2, 9, 7, 2, 6, 3, 5, 4, 5, 2, 2, 4, 3, 2, 3, 3, 3, 3, 2, 2, 2, 10, 8, 2, 7, 3, 6, 4, 6, 2, 2, 5, 5, 5, 3, 2, 4, 4, 2, 4, 3, 3, 4, 2, 2, 2, 3, 3, 2, 2, 2, 2, 2, 2, 2 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 COMMENTS See A138138 and A138151 for more information. LINKS Robert Price, Table of n, a(n) for n = 1..9514, 25 rows. EXAMPLE Triangle begins: 0; 2; 3; 4,2,2; 5,3,2; 6,4,2,3,3,2,2,2; 7,5,2,4,3,3,2,2; 8,6,2,5,3,4,4,4,2,2,3,3,2,2,2,2,2; 9,7,2,6,3,5,4,5,2,2,4,3,2,3,3,3,3,2,2,2; 10,8,2,7,3,6,4,6,2,2,5,5,5,3,2,4,4,2,4,3,3,4,2,2,2,3,3,2,2,2,2,2,2,2; ... MATHEMATICA Join[{0}, Table[Cases[IntegerPartitions[n], x_ /; Last[x] != 1], {n, 10}]] // Flatten (* Robert Price, May 22 2020 *) CROSSREFS Cf. A138137, A138138, A138151. Sequence in context: A214065 A182710 A182711 * A056472 A162247 A264809 Adjacent sequences:  A138133 A138134 A138135 * A138137 A138138 A138139 KEYWORD nonn,tabf,changed AUTHOR Omar E. Pol, Mar 23 2008 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
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified June 5 09:46 EDT 2020. Contains 334829 sequences. (Running on oeis4.)