A130735 Primes p such that p+2, n*(p+2)+6 and p*(p+2)+8 are also prime.

5, 11, 2591, 4127, 10427, 11831, 15887, 28547, 56921, 60257, 61331, 62927, 65717, 70487, 74411, 77417, 77687, 81281, 87221, 100391, 104087, 115301, 116687, 121367, 124181, 129287, 148691, 149111, 158141, 173741, 199151, 208961

Offset

1,1

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Maple

a:=proc(n) local p: p:=ithprime(n): if isprime(p+2)=true and isprime(p*(p+2)+6) =true and isprime(p*(p+2)+8)=true then p else end if end proc: seq(a(n), n= 1 .. 20000); # Emeric Deutsch, Jul 25 2007

Mathematica

apQ[n_]:=Module[{n2=n(n+2)}, And@@PrimeQ[{n+2, n2+6, n2+8}]]; Select[Prime[Range[ 20000]], apQ] (* Harvey P. Dale, Apr 07 2013 *)

Crossrefs

Sequence in context: A174955 A224095 A370664 * A322153 A022835 A022834

Adjacent sequences: A130732 A130733 A130734 * A130736 A130737 A130738

Keyword

nonn

Author

Ray G. Opao, Jul 06 2007

Extensions

More terms from Emeric Deutsch, Jul 25 2007

Status

approved