A132347 Concatenation of first n members of the Padovan sequence A000931.
1, 10, 100, 1001, 10010, 100101, 1001011, 10010111, 100101112, 1001011122, 10010111223, 100101112234, 1001011122345, 10010111223457, 100101112234579, 10010111223457912, 1001011122345791216, 100101112234579121621
Offset: 1
Programs
-
Mathematica
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 *)