OFFSET
1,1
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
FORMULA
a(n) = 3*A023208(n) + 2.
EXAMPLE
a(7) = 3*23 + 2 = 71.
MATHEMATICA
Select[Table[3*Prime[n]+2, {n, 200}], PrimeQ] (* Vladimir Joseph Stephan Orlovsky, Feb 01 2012 *)
PROG
(PARI) forprime(p=2, 600, if(isprime(q=3*p+2), print1(q, ", ")))
(Haskell)
a094524 = (+ 2) . (* 3) . a023208 -- Reinhard Zumkeller, Aug 15 2011
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Klaus Brockhaus, May 07 2004
STATUS
approved