This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A217532 #6 Jan 20 2024 15:15:54 %S A217532 210,1210,2100,12100,21000,21021,36522,63141,89195,92029,112132, %T A217532 116010,118461,121000,149851,203013,203202,210000,214456,303142, %U A217532 304341,313230,323723,331401,351760,416213,441532,524371,534656,574915,610171,654560,897648,999643 %N A217532 Numbers k such that sum of 4th power of digits of k equals the sum of prime divisors of k. %C A217532 Numbers k such that A055013(k) = A008472(k). %e A217532 210 = 2*3*5*7 is in the sequence because 2^4 + 1^4 + 0^4 = 2 + 3 + 5 + 7 = 17. %t A217532 Rest[Select[Range[1000000], Total[Transpose[FactorInteger[#]][[1]]]==Total[IntegerDigits[#]^4]&]] %Y A217532 Cf. A055013, A008472. %K A217532 nonn,easy,base %O A217532 1,1 %A A217532 _Michel Lagneau_, Oct 05 2012