OFFSET
1,1
COMMENTS
Is this sequence infinite?
EXAMPLE
17^x + 19^x = 23 (mod 29) has no solutions, therefore 17 is in the sequence.
MATHEMATICA
a = {}; For[n = 1, n < 120, n++, c = 1; For[x = 0, x < Prime[n + 3], x++, If[Mod[Prime[n]^x + Prime[n + 1]^x, Prime[n + 3]] == Prime[n + 2], c = 0]]; If[c == 1, AppendTo[a, Prime[n]]]]; a
PROG
(PARI) \No solutions to prime(i)^x+prime(i+1)^x ~= prime(i+2) mod prime(i+3) noanpbn(m, n) = { for(p=1, m, f=0; for(x=0, n, if((prime(p)^x+prime(p+1)^x-prime(p+2))%prime(p+3)==0, f=1) ); if( f==0, print1(p" ")) ) }
CROSSREFS
KEYWORD
nonn
AUTHOR
Cino Hilliard, May 11 2003
EXTENSIONS
Edited by Stefan Steinerberger, Jul 28 2007
STATUS
approved