|
|
A134802
|
|
Concatenation of first n partition numbers of positive integers.
|
|
0
|
|
|
1, 12, 123, 1235, 12357, 1235711, 123571115, 12357111522, 1235711152230, 123571115223042, 12357111522304256, 1235711152230425677, 1235711152230425677101, 1235711152230425677101135
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
MATHEMATICA
|
Module[{nn=20, p}, p=PartitionsP[Range[nn]]; Table[FromDigits[Flatten[ IntegerDigits/@ Take[p, n]]], {n, nn}]] (* Harvey P. Dale, May 10 2021 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn,base
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|