A015904 Numbers k such that k | 12^k + 12.
1, 2, 3, 4, 6, 12, 15, 26, 28, 52, 76, 78, 87, 156, 364, 435, 532, 988, 2356, 3052, 5356, 6916, 7588, 10095, 11476, 13636, 15051, 15964, 16458, 24388, 31996, 36114, 40132, 42484, 46396, 50428, 50726, 72436, 114846, 132652, 148276, 171076, 208468
Offset: 1
Keywords
Links
- Giovanni Resta, Table of n, a(n) for n = 1..700
Crossrefs
Programs
-
Mathematica
Select[Range[10^5], Mod[PowerMod[12, #, #] + 12, #] == 0 &] (* Giovanni Resta, Oct 23 2018 *)
Extensions
Missing a(2)-a(5) from Giovanni Resta, Oct 23 2018