A015905 Numbers k such that k | 13^k + 13.

1, 2, 13, 14, 26, 182, 286, 2626, 2926, 8866, 10186, 57226, 62686, 118378, 185653, 187838, 284662, 396526, 689546, 792946, 927706, 1110214, 1140686, 1501526, 1943266, 2034406, 2402686, 2427706, 2759926, 3032926, 4450706, 6586426, 6849766, 7319026, 9357518

Offset: 1

Author

Robert G. Wilson v

Keywords

• nonn

Links

• Giovanni Resta, Table of n, a(n) for n = 1..400

Crossrefs

Cf. A006517, A015888, A015889, A015891, A015892, A015893, A015897, A015898, A015902, A015903, A015904, A015906.

Programs

Mathematica

Select[Range[10^6], Mod[13 + PowerMod[13, #, #], #] == 0 &] (* Giovanni Resta, Oct 21 2018 *)

Extensions

Missing a(2) and a(33)-a(35) from Giovanni Resta, Oct 21 2018