A217532 Numbers k such that sum of 4th power of digits of k equals the sum of prime divisors of k.
210, 1210, 2100, 12100, 21000, 21021, 36522, 63141, 89195, 92029, 112132, 116010, 118461, 121000, 149851, 203013, 203202, 210000, 214456, 303142, 304341, 313230, 323723, 331401, 351760, 416213, 441532, 524371, 534656, 574915, 610171, 654560, 897648, 999643
Offset: 1
Examples
210 = 2*3*5*7 is in the sequence because 2^4 + 1^4 + 0^4 = 2 + 3 + 5 + 7 = 17.
Programs
-
Mathematica
Rest[Select[Range[1000000], Total[Transpose[FactorInteger[#]][[1]]]==Total[IntegerDigits[#]^4]&]]
Comments