|
%I #14 Sep 08 2022 08:45:19
%S 0,2,12,14,42,44,60,62,66,72,86,90,104,114,132,150,152,170,174,182,
%T 186,192,200,212,222,230,234,264,276,284,290,300,312,336,342,350,354,
%U 356,362,380,384,390,402,416,432,446,450,452,464,476,480,486,494,504,506
%N Numbers n such that 43*n + 41 is prime.
%C 41 and 43 are twin primes.
%e If n=0 then 43*n + 41 = 41 (prime).
%e If n=90 then 43*n + 41 = 3911 (prime).
%t Select[Range[0,510],PrimeQ[43#+41]&] (* _Harvey P. Dale_, Feb 27 2012 *)
%o (Magma) [n: n in [0..10000] |IsPrime(43*n + 41)] - _Vincenzo Librandi_, Nov 13 2010
%o (PARI) is(n)=isprime(43*n+41) \\ _Charles R Greathouse IV_, Jun 13 2017
%K nonn,easy
%O 1,2
%A _Parthasarathy Nambi_, Jul 30 2005
|
