login
A045579
Numbers k that divide 6^k + 2^k.
1
1, 2, 4, 8, 10, 16, 32, 50, 64, 128, 136, 164, 250, 256, 512, 1024, 1250, 1544, 2048, 2312, 4096, 5050, 6250, 6724, 8192, 11810, 16384, 25250, 26248, 31250, 32768, 32896, 39304, 59050, 65536, 126250, 131072, 156250, 262144, 275684, 295250, 297992, 376708, 446216
OFFSET
1,2
LINKS
MATHEMATICA
Select[Range[300000], Divisible[PowerMod[2, #, #] + PowerMod[6, #, #], #] &] (* Amiram Eldar, Oct 23 2021 *)
CROSSREFS
Cf. A074601.
Sequence in context: A271816 A097210 A097214 * A177050 A276772 A173063
KEYWORD
nonn
STATUS
approved