OFFSET
1,1
LINKS
John Cerkan, Table of n, a(n) for n = 1..10000
MAPLE
A023233:=n->`if`(isprime(n) and isprime(9*n+2), n, NULL): seq(A023233(n), n=1..10^3); # Wesley Ivan Hurt, Sep 08 2016
MATHEMATICA
Select[Prime[Range[200]], PrimeQ[9#+2]&] (* Harvey P. Dale, Dec 02 2010 *)
PROG
(Magma) [n: n in [0..1000] | IsPrime(n) and IsPrime(9*n+2)] // Vincenzo Librandi, Nov 20 2010
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved