A102704 - OEIS

%I #9 Jul 08 2021 03:10:42

%S 1,2,4,8,13,25,32,35,41,49,52,56,59,70,71,73,77,79,85,94,98,100,101,

%T 104,107,133,134,136,137,139,143,157,161,164,172,179,182,184,188,191,

%U 199,202,203,212,221,223,230,239,242,247

%N Numbers k such that k999 is prime.

%C Also numbers k such that 1000*k + 999 is prime. - _Stefan Steinerberger_, Feb 22 2006

%H Chris Caldwell, <a href="http://www.utm.edu/research/primes/lists/small/100000.txt">The First 100,008 Primes</a>.

%e If k=1,  then k999 =  1999 (prime).

%e If k=25, then k999 = 25999 (prime).

%e If k=49, then k999 = 49999 (prime).

%t Do[If[PrimeQ[1000*n + 999], Print[n]], {n, 1, 250}] (* _Stefan Steinerberger_, Feb 22 2006 *)

%K nonn,base

%O 1,2

%A _Parthasarathy Nambi_, Feb 04 2005

%E More terms from _Stefan Steinerberger_, Feb 22 2006