Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A128680
Numbers k such that k^3 divides 6^(k^2) + 1.
20
1, 7, 203, 1379, 11977, 39991, 577129, 2359469, 4780447, 6521291, 6640739, 9904979, 21511301, 28434413, 34050611, 113694413, 189117439, 222281549, 250163599, 282046373, 391803601, 941748059, 1269166759, 1308225583
OFFSET
1,2
COMMENTS
7 divides a(n) for n > 1.
MATHEMATICA
Select[Range[5*10^6], Mod[ 6^(#^2)+1, #^3]==0 &] (* G. C. Greubel, Jan 18 2018 *)
CROSSREFS
Cf. A127263 (numbers k such that k^3 divide 2^(k^2)+1).
Cf. A128677 (least k > p such that (k*p)^3 divides (p-1)^(k*p)^2+1, where p = prime(n) > 2).
Sequence in context: A226414 A226345 A361141 * A292332 A177813 A292338
KEYWORD
hard,nonn
AUTHOR
Alexander Adamchuk, Mar 31 2007
EXTENSIONS
More terms from Ryan Propper, Jan 13 2008
STATUS
approved