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

login
A056088
Numbers k such that k^16 == 1 (mod 17^3).
8
1, 158, 399, 653, 802, 827, 1022, 1985, 2928, 3891, 4086, 4111, 4260, 4514, 4755, 4912, 4914, 5071, 5312, 5566, 5715, 5740, 5935, 6898, 7841, 8804, 8999, 9024, 9173, 9427, 9668, 9825, 9827, 9984, 10225, 10479, 10628, 10653, 10848, 11811, 12754, 13717, 13912
OFFSET
1,2
LINKS
MATHEMATICA
x=17; Select[ Range[ 20000 ], PowerMod[ #, x-1, x^3 ]==1& ]
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Jun 08 2000
STATUS
approved