A014181 Numbers > 9 with all digits the same.
11, 22, 33, 44, 55, 66, 77, 88, 99, 111, 222, 333, 444, 555, 666, 777, 888, 999, 1111, 2222, 3333, 4444, 5555, 6666, 7777, 8888, 9999, 11111, 22222, 33333, 44444, 55555, 66666, 77777, 88888, 99999, 111111, 222222, 333333, 444444, 555555, 666666, 777777, 888888
Offset: 1
Links
- Index entries for linear recurrences with constant coefficients, signature (0, 0, 0, 0, 0, 0, 0, 0, 11, 0, 0, 0, 0, 0, 0, 0, 0, -10).
Crossrefs
Same as A010785 except for one-digit numbers.
Programs
-
Mathematica
Table[Map[FromDigits@ Table[#, k] &, Range@ 9], {k, 2, 6}] // Flatten (* Michael De Vlieger, Jun 24 2016 *)
-
PARI
A014181(n)=10^((n+17)\9)\9*((n-1)%9+1) \\ See A010785 for a nxt() function. - M. F. Hasler, Jun 24 2016
Extensions
Better definition and offset changed to 1 by M. F. Hasler, Jun 24 2016
Comments