|
%I #20 Oct 20 2023 06:46:58
%S 4,10,36,40,48,94,120,130,138,160,174,180,198,216,226,250,268,270,274,
%T 276,286,298,328,330,346,348,360,366,396,400,414,450,454,456,460,466,
%U 474,478,480,498,510,528,538,550,558,580,598,606,648,676,678,688,690
%N Numbers n such that 911*n - 7 is prime.
%C 7 and 911 are primes.
%H Harvey P. Dale, <a href="/A108596/b108596.txt">Table of n, a(n) for n = 1..1000</a>
%e If n=4 then 911*n - 7 = 3637 (prime).
%e If n=160 then 911*n - 7 = 145753 (prime).
%t Select[Range[700],PrimeQ[911#-7]&] (* _Harvey P. Dale_, Feb 27 2022 *)
%o (Magma) [n: n in [1..700] | IsPrime(911*n-7)]; - _Vincenzo Librandi_, Nov 13 2010
%o (PARI) is(n)=isprime(911*n-7) \\ _Charles R Greathouse IV_, Jun 13 2017
%o (SageMath) [n for n in (1..800) if is_prime(911*n-7)] # _G. C. Greubel_, Oct 20 2023
%Y Cf. A108938, A108597.
%K nonn,easy
%O 1,1
%A _Parthasarathy Nambi_, Jul 25 2005
|
