A177913 Numbers k such that k^3 divides 13^(k^2) - 1.
1, 2, 3, 4, 6, 10, 12, 14, 20, 28, 30, 34, 42, 60, 68, 70, 84, 102, 110, 114, 140, 170, 183, 204, 210, 220, 222, 228, 238, 330, 340, 366, 406, 420, 444, 476, 510, 570, 660, 714, 732, 770, 798, 812, 820, 876, 930, 942, 1010, 1020, 1110, 1140, 1190, 1218, 1428
Offset: 1
Keywords
Links
- Robert Price, Table of n, a(n) for n = 1..2236
Crossrefs
Programs
-
Mathematica
Join[{1}, Select[Range[3000000], PowerMod[13, #^2, #^3] == 1 &]] (* Robert Price, Mar 31 2020 *)