A092408 Numbers k that divide 3^(k^3) + 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

Author

Robert G. Wilson v, Apr 02 2004

Keywords

• nonn

Comments

It appears that all numbers of the form 2*17^m are present.

Crossrefs

Cf. A015949, A093546, A093666.

Programs

Mathematica

Select[ Range[ 350000000], PowerMod[3, #^3, # ] +1 == # &]