OFFSET
1,1
COMMENTS
The primality of the numbers corresponding to the first 4 terms has been certified with Primo.
EXAMPLE
k = 15 is in the sequence since the 15-digit number 151515151515151 is prime.
MATHEMATICA
f[n_]:=Block[{d=IntegerDigits@n}, FromDigits@d[[Mod[Range@n - 1, Length@d]+1]]]; Select[Range@1500, PrimeQ@f@# &]
CROSSREFS
KEYWORD
nonn,base,more
AUTHOR
Giovanni Resta, Sep 11 2012
STATUS
approved