|
%I #16 Sep 08 2022 08:45:19
%S 0,14,20,26,38,44,48,56,60,66,80,90,116,126,138,140,146,158,170,174,
%T 186,198,200,224,228,230,236,240,248,254,264,266,270,290,294,300,306,
%U 308,314,320,324,338,354,356,368,374,378,384,390,398,404,416,426,434,446
%N Numbers n such that 41*n + 43 is prime.
%H Harvey P. Dale, <a href="/A108874/b108874.txt">Table of n, a(n) for n = 1..1000</a>
%e If n=0 then 41*n + 43 = 43 (prime).
%e If n=90 then 41*n + 43 = 3733 (prime).
%t Select[Range[0,500],PrimeQ[41#+43]&] (* _Harvey P. Dale_, May 09 2012 *)
%o (Magma) [n: n in [0..500] | IsPrime(41*n+43)]; - _Vincenzo Librandi_, Nov 13 2010
%o (PARI) is(n)=isprime(41*n+43) \\ _Charles R Greathouse IV_, Jun 12 2017
%K nonn,easy
%O 1,2
%A _Parthasarathy Nambi_, Jul 30 2005
|
