login
A056087
Numbers k such that k^14 == 1 (mod 15^3).
8
1, 1376, 1999, 3374, 3376, 4751, 5374, 6749, 6751, 8126, 8749, 10124, 10126, 11501, 12124, 13499, 13501, 14876, 15499, 16874, 16876, 18251, 18874, 20249, 20251, 21626, 22249, 23624, 23626, 25001, 25624, 26999, 27001, 28376, 28999, 30374, 30376, 31751, 32374
OFFSET
1,2
LINKS
MATHEMATICA
x=15; Select[ Range[ 50000 ], PowerMod[ #, x-1, x^3 ]==1& ]
Select[Range[31000], PowerMod[#, 14, 3375]==1&] (* Harvey P. Dale, Nov 27 2019 *)
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Jun 08 2000
STATUS
approved