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 A353901 #5 May 10 2022 14:27:03
%S A353901 1,6,28,56,1104,2208,2178540,4357080,6499584,12999168
%N A353901 Numbers k such that A353900(k) is divisible by k.
%C A353901 a(11) > 8*10^10, if it exists.
%C A353901 The corresponding ratios A353900(k)/k are 1, 2, 2, 1, 2, 1, 4, 2, 2, 1, ...
%e A353901 6 is a term since A353900(6) = 12 is divisible by 6.
%e A353901 56 is a term since A353900(56) = 56 is divisible by 56.
%t A353901 f[p_, e_] := 1 + Sum[p^(2^k), {k, 0, Floor[Log2[e]]}]; s[1] = 1; s[n_] := Times @@ f @@@ FactorInteger[n]; Select[Range[6.5*10^6], Divisible[s[#], #] &]
%Y A353901 Cf. A353900.
%Y A353901 Similar sequences: A007691, A189000, A327158, A348601.
%K A353901 nonn,more
%O A353901 1,2
%A A353901 _Amiram Eldar_, May 10 2022