login
Numbers k that divide 9^k + 2^k.
0

%I #18 Sep 01 2024 18:36:31

%S 1,11,121,1331,14641,161051,1771561,19487171,214358881,2357947691,

%T 2852823787,25937424601,31381061657,285311670611,298369848073,

%U 345191678227,3138428376721,3282068328803,3797108460497,34522712143931

%N Numbers k that divide 9^k + 2^k.

%t Select[Range[200000], Divisible[PowerMod[2, #, #] + PowerMod[9, #, #], #] &] (* _Amiram Eldar_, Oct 23 2021*)

%Y Cf. A074600.

%K nonn,more

%O 1,2

%A _David W. Wilson_