A027828 First differences of A010785.
1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 11, 11, 11, 11, 11, 11, 11, 11, 12, 111, 111, 111, 111, 111, 111, 111, 111, 112, 1111, 1111, 1111, 1111, 1111, 1111, 1111, 1111, 1112, 11111, 11111, 11111, 11111, 11111, 11111, 11111, 11111, 11112, 111111, 111111, 111111
Offset: 0
Links
- Index entries for linear recurrences with constant coefficients, signature (-1,-1,-1,-1,-1,-1,-1,-1,10,10,10,10,10,10,10,10,10).
Crossrefs
Cf. A010785.
Programs
-
Mathematica
Differences[Union[FromDigits/@Flatten[Table[PadRight[{},i,n],{n,0,9},{i,6}],1]]] (* Harvey P. Dale, Jan 16 2013 *)
Extensions
More terms from James Sellers, May 01 2000