OFFSET
1,1
COMMENTS
The sequence appears to be infinite. The number of terms below 10^1000 is 782.
LINKS
Shyam Sunder Gupta, Table of n, a(n) for n = 1..500
EXAMPLE
a(2)= 11411 is in the sequence because it is a prime of the form abcab.
MATHEMATICA
s[n_]:=Select[Union@Flatten@Table[FromDigits@Flatten@Join[IntegerDigits@Table[b, {n}], {IntegerDigits@Floor[b/10]}], {b, 100, 999}], PrimeQ]; Array[s, 2]//Flatten
Select[FromDigits[Join[#, {#[[1]]}, {#[[2]]}]]&/@Select[Tuples[Range[0, 9], 3], #[[1]]> 0&], PrimeQ] (* Harvey P. Dale, Oct 06 2017 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Shyam Sunder Gupta, Aug 28 2013
STATUS
approved