|
%I #10 Sep 05 2017 17:34:09
%S 23,29,61,71,89,91,101,133,149,169,181,199,217,221,233,239,269,287,
%T 307,329,331,359,371,377,389,431,433,437,451,491,499,521,529,541,553,
%U 563,599,611,613,623,631,653,667,671,683,721,727,749,763,769,773,809,853
%N Numbers n such that the string 999n is prime.
%H Harvey P. Dale, <a href="/A110584/b110584.txt">Table of n, a(n) for n = 1..1000</a>
%e If n=169 then 999n = 999169 (prime).
%t Select[Range[900],PrimeQ[999*10^IntegerLength[#]+#]&] (* _Harvey P. Dale_, Sep 05 2017 *)
%K nonn,base
%O 1,1
%A _Parthasarathy Nambi_, Sep 12 2005
%E More terms from _Vincenzo Librandi_, Mar 27 2010
|
