OFFSET
1,1
EXAMPLE
The next prime after 2 is 3, so 23 follows 2 in the sequence. The next prime after 23 is 29, so 2329 comes after 23 in the sequence.
MATHEMATICA
NextPrim[n_] := Block[{k = n + 1}, While[ !PrimeQ[k], k++ ]; k]; f[n_] := ToExpression[ ToString[n] <> ToString[ NextPrim[n]]]; NestList[f, 2, 7]
CROSSREFS
KEYWORD
easy,nonn,base
AUTHOR
Joseph L. Pe, Feb 07 2002
EXTENSIONS
Edited and extended by Robert G. Wilson v, Feb 10 2002
STATUS
approved