%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_