|
%I #4 Feb 18 2024 11:54:30
%S 1,10,100,1001,10010,100101,1001011,10010111,100101112,1001011122,
%T 10010111223,100101112234,1001011122345,10010111223457,
%U 100101112234579,10010111223457912,1001011122345791216,100101112234579121621
%N Concatenation of first n members of the Padovan sequence A000931.
%t Module[{nn=20,padseq},padseq=LinearRecurrence[{0,1,1},{1,0,0},nn];Table[FromDigits[ Flatten[ IntegerDigits/@Take[padseq,n]]],{n,nn}]] (* _Harvey P. Dale_, Feb 18 2024 *)
%Y Cf. A000931, A007908, A019523, A102397. See A134732 for another version.
%K base,easy,nonn
%O 1,2
%A _Omar E. Pol_, Nov 10 2007
|
