OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
MATHEMATICA
Select[Range[225], PrimeQ[Prime[#]+Prime[2#]+Prime[3#]]&] (* Harvey P. Dale, Jan 16 2011 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Benoit Cloitre, Mar 28 2002
STATUS
approved