A111249 Numbers n such that 7*n + 8 is prime.
3, 5, 9, 15, 17, 27, 29, 33, 39, 47, 53, 59, 63, 65, 69, 77, 87, 89, 93, 95, 99, 105, 107, 117, 125, 129, 135, 137, 143, 149, 155, 165, 183, 185, 195, 203, 209, 213, 225, 227, 237, 243, 245, 267, 275, 285, 287, 297, 303, 305, 315, 323, 327, 329, 333, 339, 345
Offset: 1
Keywords
Examples
If n=125 then 7*n + 8 = 883 (prime).
Programs
-
Magma
[n: n in [0..100000] | IsPrime(7*n+8)] // Vincenzo Librandi, Nov 13 2010
-
Maple
A111249:=n->`if`(isprime(7*n+8), n, NULL): seq(A111249(n), n=1..10^3); # Wesley Ivan Hurt, Feb 13 2017
-
Mathematica
Select[Range[1,351,2], PrimeQ[7#+8]&] (* Harvey P. Dale, Sep 11 2016 *)
-
PARI
is(n)=isprime(7*n+8) \\ Charles R Greathouse IV, Feb 14 2017
Comments