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 A382511 #4 Apr 04 2025 22:45:26 %S A382511 0,1,1,3,1,9,1,10,6,18,1,31,1,31,21,36,1,66,1,65,34,69,1,114,15,94,45, %T A382511 115,1,196,1,136,72,156,43,249,1,193,97,246,1,357,1,263,165,279,1,436, %U A382511 28,380,159,361,1,549,81,442,196,438,1,753,1,499,276,528,106 %N A382511 Expansion of Sum_{p prime} x^p / (1 - x^p)^3. %F A382511 a(n) = Sum_{p|n, p prime} A000217(n/p). %F A382511 a(n) = (A069359(n) + A322078(n)) / 2. %t A382511 nmax = 65; CoefficientList[Series[Sum[x^Prime[k]/(1 - x^Prime[k])^3, {k, 1, nmax}], {x, 0, nmax}], x] // Rest %Y A382511 Cf. A000217, A001221, A007437, A069359, A305614, A322078. %K A382511 nonn %O A382511 1,4 %A A382511 _Ilya Gutkovskiy_, Mar 30 2025