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 A263084 #13 Jan 25 2025 03:13:44 %S A263084 1,2,4,6,7,11,13,14,18,22,22,28,29,31,37,41,41,46,48,52,58,62,60,68, %T A263084 71,73,79,83,83,93,95,96,100,104,108,118,120,120,124,132,131,141,141, %U A263084 145,155,157,157,165,169,172,178,184,180,190,196,202,208,210,208,220,221,223,231,237,241,251,251,251,257,267,267,278 %N A263084 a(n) = A263086(n) - A263085(n). %C A263084 See also the Plot2-link at A263086. %H A263084 Antti Karttunen, <a href="/A263084/b263084.txt">Table of n, a(n) for n = 1..10082</a> %F A263084 a(n) = A263086(n) - A263085(n). %F A263084 a(n) ~ n * (log(n) + 2*gamma - log(2) - 1), where gamma is Euler's constant (A001620). - _Amiram Eldar_, Jan 25 2025 %t A263084 Accumulate[Table[Subtract @@ DivisorSigma[0, 2*n - {0, 1}], {n, 1, 100}]] (* _Amiram Eldar_, Jan 25 2025 *) %o A263084 (Scheme) (define (A263084 n) (- (A263086 n) (A263085 n))) %o A263084 (PARI) list(lim) = {my(s = 0); for(n = 1, lim, s += numdiv(2*n) - numdiv(2*n-1); print1(s, ", "));} \\ _Amiram Eldar_, Jan 25 2025 %Y A263084 Cf. A000005, A001620, A099774, A099777, A263085, A263086. %Y A263084 Cf. also A262518, A262519. %K A263084 nonn %O A263084 1,2 %A A263084 _Antti Karttunen_, Oct 12 2015