A217533 Numbers k such that sum of 5th power of digits of k equals the sum of prime divisors of k.

22011, 50124, 220041, 704301, 1056225, 1101023, 1122254, 1404231, 2106855, 2130216, 2221110, 2351565, 3010353, 3130060, 3146247, 3169305, 3968808, 4053412, 4150651, 4213312, 4293261, 4351003, 4499068, 5053964, 5794602, 6277560, 10030353, 10211034, 10422024, 10423242

Offset

1,1

Comments

Numbers k such that A055014(k) = A008472(k).

Links

Amiram Eldar, Table of n, a(n) for n = 1..10000

Example

22011 = 3*11*23*29 is in the sequence because 2^5 + 2^5 + 0^5 + 1^5 + 1^5 = 3 + 11 + 23 + 29 = 66.

Mathematica

Rest[Select[Range[8000000], Total[Transpose[FactorInteger[#]][[1]]]==Total[IntegerDigits[#]^5]&]]

Prog

(PARI) isok(k) = vecsum(factor(k)[, 1]) == vecsum(apply(x -> x^5, digits(k))); \\ Amiram Eldar, Mar 03 2026

Crossrefs

Cf. A055014, A008472.

Cf. A070275, A217390, A217531, A217532.

Sequence in context: A109689 A209733 A203441 * A045133 A049535 A091459

Adjacent sequences: A217530 A217531 A217532 * A217534 A217535 A217536

Keyword

nonn,easy,base

Author

Michel Lagneau, Oct 05 2012

Extensions

More terms from Amiram Eldar, Mar 03 2026

Status

approved