A134800 Concatenation of next n partition numbers A000041.

1, 12, 357, 11152230, 425677101135, 176231297385490627, 792100212551575195824363010, 37184565560468428349101431231014883, 179772163726015311853733844583531746326175175

Offset: 1

Author

Omar E. Pol, Nov 12 2007

Keywords

• easy
• nonn
• base
• less

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..37

Crossrefs

Cf. A000041, A053067, A132926, A133013. See A134801 for another version.

Programs

Mathematica

FromDigits[Flatten[IntegerDigits/@#]]&/@With[{nn=10},TakeList[ PartitionsP[ Range[0,(nn(nn+1))/2]],Range[nn]]] (* Requires Mathematica version 11 or later *) (* Harvey P. Dale, Jul 25 2019 *)

Extensions

Edited by Charles R Greathouse IV, Apr 28 2010