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 A240471 #7 Dec 02 2020 03:20:03 %S A240471 1,1,1,1,1,2,1,2,2,2,1,2,1,2,2,2,1,2,1,2,2,2,1,3,2,2,2,3,1,3,1,3,2,2, %T A240471 2,3,1,2,2,3,1,3,1,3,3,2,1,3,2,3,2,3,1,3,3,3,2,2,1,4,1,2,3,3,3,3,1,3, %U A240471 2,3,1,4,1,2,3,3,3,3,1,4,3,2,1,4,3,2 %N A240471 Integer part of (n * A000005(n) / A000203(n)). %H A240471 Reinhard Zumkeller, <a href="/A240471/b240471.txt">Table of n, a(n) for n = 1..10000</a> %F A240471 a(n) = (A038040(n) - A106315(n)) / A000203(n); %F A240471 a(A046022(n)) = 1. %o A240471 (Haskell) a240471 n = n * a000005 n `div` a000203 n %o A240471 (PARI) a(n) = n*numdiv(n)\sigma(n); \\ _Michel Marcus_, Dec 02 2020 %Y A240471 Cf. A000005, A000203, A038040, A046022, A106315. %K A240471 nonn %O A240471 1,6 %A A240471 _Reinhard Zumkeller_, Apr 06 2014