login
A045590
Numbers k that divide 5^k + 4^k.
0
1, 3, 9, 21, 27, 63, 81, 147, 189, 243, 441, 567, 729, 903, 1029, 1323, 1701, 2187, 2667, 2709, 2943, 3087, 3969, 5103, 6321, 6561, 7203, 8001, 8127, 8829, 9261, 11907, 13203, 15309, 18669, 18963, 19683, 20601, 21609, 24003, 24381, 26487
OFFSET
1,2
MATHEMATICA
Select[Range[30000], Divisible[5^#+4^#, #]&] (* Harvey P. Dale, Nov 17 2013 *)
CROSSREFS
Cf. A074611.
Sequence in context: A029542 A014962 A014945 * A369768 A242740 A372901
KEYWORD
nonn
STATUS
approved