login
A108252
Primes p such that googol - p is prime.
2
797, 911, 3221, 3407, 5867, 6173, 8951, 10937, 12809, 13127, 14783, 20639, 22079, 22109, 25247, 26183, 27191, 29501, 29927, 30677, 31013, 31859, 33329, 34757, 34949, 35339, 35603, 35897, 37409, 38867, 40241, 41177, 42239, 44543, 44753, 48491, 49499, 49757, 51383
OFFSET
1,1
COMMENTS
A googol = 10^100.
LINKS
MATHEMATICA
Select[Range[5*10^4], And @@ PrimeQ[{#, 10^100 - #} ] &] (* Amiram Eldar, Dec 26 2019 *)
Select[Prime[Range[5500]], PrimeQ[10^100-#]&] (* Harvey P. Dale, Dec 21 2022 *)
PROG
(PARI) g(n) = forstep(x=1, n, 2, if(isprime(10^100-x)&isprime(x), print1(x", ")))
CROSSREFS
Cf. A108250.
Sequence in context: A086393 A336943 A108251 * A188536 A252346 A256026
KEYWORD
easy,nonn,fini
AUTHOR
Cino Hilliard, Jun 17 2005
EXTENSIONS
More terms from Amiram Eldar, Dec 26 2019
STATUS
approved