OFFSET
1,1
COMMENTS
Primes p such that 10*p+3, 100*p+33 and 1000*p+333 are also primes. - Vincenzo Librandi, Aug 04 2010
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
MATHEMATICA
Select[Prime[Range[2200]], And@@PrimeQ[NestList[10#+3&, #, 3]]&] (* Harvey P. Dale, Feb 21 2013 *)
PROG
(Magma) [n: n in [1..450000] | IsPrime(n) and IsPrime(10*n+3) and IsPrime(100*n+33) and IsPrime(1000*n+333)] // Vincenzo Librandi, Aug 04 2010
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved