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 A327326 #13 Apr 18 2024 04:22:18 %S A327326 0,0,0,1,1,2,4,5,5,7,9,10,13,14,16,19,19,20,24,25,28,31,33,34,38,40, %T A327326 42,45,48,49,55,56,56,59,61,64,70,71,73,76,80,81,87,88,91,96,98,99, %U A327326 104,106,110,113,116,117,123,126,130,133,135,136,145,146,148,153,153,156,162,163,166,169,175,176,184 %N A327326 a(n) = A006218(n) - A005187(n). %C A327326 Also, 0 together with the partial sums of A326987. %F A327326 a(n) ~ n * (log(n) + 2*gamma - 3), where gamma is Euler's constant (A001620). - _Amiram Eldar_, Apr 18 2024 %t A327326 With[{nmax = 100}, Join[{0}, Accumulate[Table[DivisorSigma[0, n], {n, 1, nmax}]]] - Table[2*n - DigitCount[n, 2, 1], {n, 0, nmax}]] (* _Amiram Eldar_, Apr 18 2024 *) %Y A327326 Cf. A000005, A001620, A005187, A006218, A326987, A327327. %K A327326 nonn %O A327326 0,6 %A A327326 _Omar E. Pol_, Sep 14 2019