A108601 Numbers n such that 7*n - 911 is prime.
132, 136, 142, 144, 150, 154, 156, 162, 166, 172, 174, 180, 190, 192, 196, 202, 214, 216, 222, 234, 240, 244, 246, 250, 252, 256, 264, 276, 280, 282, 286, 304, 306, 310, 316, 330, 334, 342, 346, 352, 354, 360, 364, 372, 376, 384, 394, 396, 400, 406, 412
Offset: 1
Examples
If n=132 then 7*n - 911 = 13 (prime). If n=172 then 7*n - 911 = 293 (prime).
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
Programs
-
Maple
A108601 := proc(n) option remember ; if n = 1 then 132 ; else for a from A108601(n-1)+1 do if isprime(7*a-911) then RETURN(a) ; fi ; od: fi ; end: seq(A108601(n),n=1..80) ; # R. J. Mathar, Apr 26 2008
-
Mathematica
Select[Range[131,500],PrimeQ[7#-911]&] (* Harvey P. Dale, Dec 08 2014 *)
-
PARI
is(n)=isprime(7*n-911) \\ Charles R Greathouse IV, Jun 12 2017
Extensions
More terms from R. J. Mathar, Apr 26 2008
Comments