OFFSET
1,1
EXAMPLE
Corresponding primes are: 9091, 909091, 909090909090909091, 909090909090909090909090909091, ...
MATHEMATICA
{ta=Table[0, {100}], u=1}; Do[s=1+(90*(100^n-1)/99); If[PrimeQ[s], Print[{n, s}]; ta[[u]]=s; u=u+1], {n, 1, 320}] ta
CROSSREFS
KEYWORD
more,nonn
AUTHOR
Labos Elemer, Jun 07 2004
EXTENSIONS
a(9)-a(10) from Max Alekseyev, Jan 28 2012
STATUS
approved