login
A023233
Primes p such that 9*p + 2 is also prime.
4
3, 5, 11, 19, 29, 31, 43, 53, 71, 73, 101, 103, 109, 113, 131, 151, 173, 179, 191, 211, 229, 233, 239, 269, 271, 281, 283, 311, 313, 373, 379, 383, 431, 443, 491, 499, 509, 521, 541, 599, 613, 619, 653, 691, 701, 719, 733, 739, 743, 751, 773, 809, 883, 919, 929, 971, 983
OFFSET
1,1
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
Sequence in context: A217792 A284036 A172438 * A048161 A284034 A051642
KEYWORD
nonn
STATUS
approved