close
login
A092408
Numbers k that divide 3^(k^3) + 1.
1
1, 2, 34, 386, 578, 6562, 9826, 74498, 111554, 167042, 1100546, 1192354, 1266466, 1896418, 2839714, 14378114, 18709282, 20270018, 21529922, 32239106, 35759426, 48275138, 191812802, 212405378, 230124322, 244427938, 318057794, 344590306
OFFSET
1,2
COMMENTS
It appears that all numbers of the form 2*17^m are present.
MATHEMATICA
Select[ Range[ 350000000], PowerMod[3, #^3, # ] +1 == # &]
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Apr 02 2004
STATUS
approved