A290390 Double repunit numbers: repunits with repunit indices.
0, 1, 11111111111, 111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
Offset: 0
Programs
-
Mathematica
Table[Nest[FromDigits@ ConstantArray[1, #] &, n, 2], {n, 0, 3}] (* Michael De Vlieger, Jul 30 2017 *)
-
PARI
a002275(n) = (10^n-1)/9 a(n) = a002275(a002275(n))
Comments