OFFSET
1,1
COMMENTS
Terms 157, 257, 263, 541, 1187, 1459, 2179 also belong to A030460. - Carmine Suriano, Jan 27 2011
All terms, except for the first one, must be either in A185934 or in A185935, i.e., have the same residue (mod 6) as the subsequent prime. - M. F. Hasler, Feb 06 2011
LINKS
M. F. Hasler and Charles R Greathouse IV, Table of n, a(n) for n = 1..10000 (first 4110 terms from Hasler)
MATHEMATICA
Select[Prime[Range[500]], PrimeQ[FromDigits[Join[IntegerDigits[#], IntegerDigits[ NextPrime[#]]]]]&] (* Harvey P. Dale, Jun 20 2011 *)
PROG
(PARI) o=2; forprime(p=3, 1e4, isprime(eval(Str(o, o=p))) & print1(precprime(p-1)", ")) \\ M. F. Hasler, Feb 06 2011
CROSSREFS
KEYWORD
nonn,base
AUTHOR
STATUS
approved