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 A344733 #4 May 28 2021 00:55:53 %S A344733 1,25,387,6063,1416379,1416403,1416411,331362359,5068450527 %N A344733 Numbers k such that k divides A327573(k). %C A344733 The corresponding quotients A327573(k)/k are 1, 3, 5, 7, 11, 11, 11, 15, 17, ... %C A344733 a(10) > 7.5*10^10, if it exists. %e A344733 a(1) = 1 since A327573(1) = 1 is divisible by 1. %e A344733 a(2) = 25 since A327573(25) = 75 = 3 * 25 is divisible by 25. %t A344733 f[p_, e_] := 2^DigitCount[e, 2, 1]; s[1] = 1; s[n_] := s[n] = s[n - 1] + Times @@ f @@@ FactorInteger[n]; Select[Range[1.5*10^6], Divisible[s[#], #] &] %Y A344733 Cf. A037445, A327573. %Y A344733 The infinitary version of A050226. %Y A344733 Similar sequences: A064610, A344731, A344732. %K A344733 nonn,more %O A344733 1,2 %A A344733 _Amiram Eldar_, May 27 2021