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 A259674 #50 Sep 08 2022 08:46:13
%S A259674 1,714,1065,1173,6486,7755,9951
%N A259674 Numbers n such that the sum of the divisors of n equals the third power of the sum of the digits of n.
%e A259674 714 is in the sequence because (1+2+3+6+7+14+17+21+34+42+ 51+102+119+238+357+714) = (7+1+4)^3 = 1728.
%t A259674 n = 400000; list={}; x = 1; While[x<=n, If[DivisorSigma[1,x] == Total[IntegerDigits[x]]^3, AppendTo[list, x]]; x = x + 1]; list
%o A259674 (Magma) [n: n in [1..10^7] | DivisorSigma(1,n) eq (&+Intseq(n)^3)];
%o A259674 (PARI) isok(n) = sigma(n) == sumdigits(n)^3; \\ _Michel Marcus_, Sep 01 2015
%Y A259674 Subsequence of A020477.
%Y A259674 Cf. A000578, A055012, A260598.
%K A259674 nonn,base,less,fini,full
%O A259674 1,2
%A A259674 _Vincenzo Librandi_, Aug 29 2015