A015953 Numbers k such that k | 6^k + 1.
1, 7, 49, 203, 343, 1379, 1421, 2401, 5887, 9653, 9947, 11977, 16807, 39991, 41209, 67571, 69629, 83839, 117649, 170723, 271663, 279937, 288463, 347333, 472997, 487403, 586873, 706643, 823543, 1159739, 1195061, 1901641, 1959559, 2019241, 2359469, 2431331
Offset: 1
Keywords
Links
- Seiichi Manyama, Table of n, a(n) for n = 1..100
Crossrefs
Programs
-
Mathematica
Select[Range[2000000],PowerMod[6,#,#]==#-1&] (* Harvey P. Dale, Aug 28 2012 *)