Nothing Special   »   [go: up one dir, main page]

login
A056086
Numbers k such that k^12 == 1 (mod 13^3).
8
1, 239, 418, 657, 1036, 1037, 1160, 1161, 1540, 1779, 1958, 2196, 2198, 2436, 2615, 2854, 3233, 3234, 3357, 3358, 3737, 3976, 4155, 4393, 4395, 4633, 4812, 5051, 5430, 5431, 5554, 5555, 5934, 6173, 6352, 6590, 6592, 6830, 7009, 7248, 7627, 7628, 7751
OFFSET
1,2
LINKS
MATHEMATICA
x=13; Select[ Range[ 10000 ], PowerMod[ #, x-1, x^3 ]==1& ]
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Jun 08 2000
STATUS
approved