|
%I #15 May 24 2018 08:03:55
%S 0,12,14,24,32,48,60,68,78,90,92,102,110,122,132,134,138,140,152,164,
%T 168,174,182,188,204,218,222,224,230,258,264,270,288,294,302,308,320,
%U 344,360,362,368,374,402,404,432,434,438,444,470,474,498
%N Numbers k such that 101*k + 1009 is prime.
%C 101 is the smallest three-digit prime and 1009 is the smallest four-digit prime.
%H G. C. Greubel, <a href="/A101557/b101557.txt">Table of n, a(n) for n = 1..10000</a>
%e If n=0, then 101*0 + 1009 = 1009 (prime).
%e If n=90, then 101*90 + 1009 = 10099 (prime).
%e If n=164, then 101*164 + 1009 = 17573 (prime).
%t Select[Range[0, 500], PrimeQ[101# + 1009] &] (* _Stefan Steinerberger_, Feb 28 2006 *)
%o (PARI) is(n)=isprime(101*n+1009) \\ _Charles R Greathouse IV_, Jun 13 2017
%K nonn,easy
%O 1,2
%A _Parthasarathy Nambi_, Jan 25 2005
%E More terms from _Stefan Steinerberger_, Feb 28 2006
|
