login
A056083
Numbers k such that k^6 == 1 (mod 7^3).
8
1, 18, 19, 324, 325, 342, 344, 361, 362, 667, 668, 685, 687, 704, 705, 1010, 1011, 1028, 1030, 1047, 1048, 1353, 1354, 1371, 1373, 1390, 1391, 1696, 1697, 1714, 1716, 1733, 1734, 2039, 2040, 2057, 2059, 2076, 2077, 2382, 2383, 2400, 2402, 2419, 2420
OFFSET
1,2
LINKS
MATHEMATICA
x=7; Select[ Range[ 3000 ], PowerMod[ #, x-1, x^3 ]==1& ]
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Jun 08 2000
STATUS
approved