OFFSET
1,1
EXAMPLE
88 is the 36th composite which is not divisible by 3; a(36)=-1+(88+1)*10^33=88999999999999999999999999999999999, i.e. 88 followed by 33 copies of digit 9.
MATHEMATICA
c[x_] := FixedPoint[x+PrimePi[ # ]+1&, x] Table[fl=1; k=0; Do[s=(c[m]+1)*10^n-1; If[PrimeQ[s]&&(fl==1)&&!Equal[Mod[c[m], 3], 0], Print[s]; fl=0], {n, 1, 100}], {m, 1, 256}]
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Labos Elemer, Sep 03 2002
STATUS
approved