OFFSET
1,1
COMMENTS
One plus the number of iterations necessary to reach the composite number using the formula in the program. - Robert G. Wilson v, Jul 23 2002
FORMULA
See program below.
EXAMPLE
n=10^11: the list= {100000000000, 104118054814, 104280509328, 104286914053, 104287166025, 104287176027, 104287176414, 104287176419}, its length including initial term is 8, so a(11)=8.
MATHEMATICA
Table[Length[FixedPointList[10^w+PrimePi[ # ]+1&, 10^w]]-1, {w, 1, 11}]
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Labos Elemer, Jul 22 2002
EXTENSIONS
More terms from Robert G. Wilson v, Jul 23 2002
STATUS
approved