login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

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