|
%I #6 May 10 2021 19:29:08
%S 1,12,123,1235,12357,1235711,123571115,12357111522,1235711152230,
%T 123571115223042,12357111522304256,1235711152230425677,
%U 1235711152230425677101,1235711152230425677101135
%N Concatenation of first n partition numbers of positive integers.
%t Module[{nn=20,p},p=PartitionsP[Range[nn]];Table[FromDigits[Flatten[ IntegerDigits/@ Take[p,n]]],{n,nn}]] (* _Harvey P. Dale_, May 10 2021 *)
%Y Cf. A007908, A019518. Partition numbers: A000041. See A132926 for another version of the concatenation of first n partition numbers.
%K easy,nonn,base
%O 1,2
%A _Omar E. Pol_, Nov 12 2007
%E Edited by _Charles R Greathouse IV_, Apr 25 2010
|
