login
A045585
Numbers k that divide 5^k + 3^k.
0
1, 2, 34, 578, 4658, 9826, 79186, 167042, 638146, 1346162, 2839714, 5109826, 10848482, 22884754, 48275138, 86867042, 87426002, 184424194, 389040818, 459469778, 700046162, 820677346, 1476739714, 1486242034, 3135211298, 5605479122, 6613693906, 7810986226, 11900784754, 11977362274
OFFSET
1,2
MATHEMATICA
Select[Range[10^6], Divisible[PowerMod[3, #, #] + PowerMod[5, #, #], #] &] (* Amiram Eldar, Oct 23 2021 *)
CROSSREFS
Cf. A074606.
Sequence in context: A273052 A098704 A119298 * A092883 A134495 A173208
KEYWORD
nonn
EXTENSIONS
a(26)-a(30) from Amiram Eldar, Oct 23 2021
STATUS
approved