|
|
A059256
|
|
Primes p such that x^29 = 2 has no solution mod p.
|
|
3
|
|
|
59, 233, 349, 523, 929, 1103, 1277, 1451, 1567, 1741, 1973, 2089, 2437, 2843, 3307, 3539, 4003, 4177, 4409, 4583, 4931, 5279, 5569, 5743, 5801, 6091, 6323, 6961, 7019, 7193, 7309, 7541, 8179, 8237, 8353, 8527, 8933, 9049, 9281, 9397, 9629, 9803
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MATHEMATICA
|
ok[p_]:= Reduce[Mod[x^29 - 2, p] == 0, x, Integers] == False; Select[Prime[Range[1300]], ok] (* Vincenzo Librandi, Sep 20 2012 *)
|
|
PROG
|
(Magma) [p: p in PrimesUpTo(10000) | not exists{x : x in ResidueClassRing(p) | x^29 eq 2} ]; // Vincenzo Librandi, Sep 20 2012
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|