OFFSET
1,1
FORMULA
a(n) = 210*A076355(n) + 11. - Zak Seidov, Jan 14 2014
MATHEMATICA
Select[210 Range[0, 100] + 11, PrimeQ@ # &]
Select[Range[11, 10^4, 210], PrimeQ] (* Zak Seidov, Jan 14 2014 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Juri-Stepan Gerasimov, Jul 04 2008
EXTENSIONS
I changed the Mathematica coding and extended the sequence. - Robert G. Wilson v, Sep 22 2008
STATUS
approved
