OFFSET
0,1
FORMULA
MATHEMATICA
Prime[1+PrimePi[6Range[0, 50]]] (* T. D. Noe, Nov 15 2006 *)
NextPrime[6*Range[0, 50]] (* Harvey P. Dale, Sep 05 2015 *)
PROG
(PARI) a(n) = nextprime(6*n); \\ Michel Marcus, Feb 13 2021
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Jonathan Vos Post, Apr 29 2006
EXTENSIONS
Corrected by T. D. Noe, Nov 15 2006
STATUS
approved