%I #10 Dec 26 2019 05:06:12
%S 277,331,447,525,577,627,643,811,897,921,937,955,1017,1095,1131,1137,
%T 1213,1347,1477,1533,1551,1621,1813,1857,1911,2071,2083,2157,2167,
%U 2185,2193,2205,2257,2277,2391,2431,2443,2457,2475,2535,2655,2667,2953,3003
%N Numbers k such that little googol + k is prime.
%H Amiram Eldar, <a href="/A108253/b108253.txt">Table of n, a(n) for n = 1..10000</a>
%F A little googol = 2^100.
%t With[{c=2^100},Select[Range[3100],PrimeQ[c+#]&]] (* _Harvey P. Dale_, Jan 09 2014 *)
%o (PARI) g(n) = forstep(x=1,n,2,if(isprime(2^100+x),print1(x",")))
%Y Cf. A108254.
%K easy,nonn
%O 1,1
%A _Cino Hilliard_, Jun 17 2005
|