OFFSET
1,2
COMMENTS
Begin with a 'seed' number, in this case a(1) = 1. Then a(n) is the concatenation of a(n-1) and some prime greater than any prime previously used to create a new prime number. Such a sequence is called a 'sequential prime' sequence.
LINKS
Robert G. Wilson v, Table of n, a(n) for n = 1..100
MATHEMATICA
p = 3; f[n_] := Block[{}, While[q = n*10^Floor[1 + Log10[p]] + p; !PrimeQ[q], p = NextPrime[p]]; p = NextPrime[p]; q]; NestList[f, 1, 14] (* Robert G. Wilson v, Jan 14 2012 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Rajesh Bhowmick, Jan 14 2012
EXTENSIONS
Edited and extended by Robert G. Wilson v, Jan 14 2012
STATUS
approved