OFFSET
1,1
COMMENTS
Suggested by the Goldbach Conjecture.
EXAMPLE
3+97=100; 11+89=100; 17+83=100; 29+71=100; 41+59=100; 47+53=100
MATHEMATICA
Select[Prime[Range[25]], PrimeQ[100-#]&] (* James C. McMahon, Dec 26 2024 *)
PROG
(PARI) is(n)=isprime(n)&&isprime(100-n) \\ Charles R Greathouse IV, Sep 26 2013
CROSSREFS
KEYWORD
easy,fini,full,nonn
AUTHOR
Tomas Xordan, Feb 14 2007
STATUS
approved