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 A329274 #6 Nov 11 2019 18:45:33 %S A329274 1,2,7,24,83,286,989,3416,11807,40806,141041,487488,1684971,5823986, %T A329274 20130299,69579356,240497727,831269134,2873243541,9931234972, %U A329274 34326861907,118649239730,410105717339,1417511828340,4899565424887,16935125993974,58535496103303,202325291692972 %N A329274 Expansion of 1 / (1 + Sum_{k>=1} phi(k) * log(1 - 2 * x^k) / k), where phi = A000010. %C A329274 Invert transform of A000031. %F A329274 a(0) = 1; a(n) = Sum_{k=1..n} A000031(k) * a(n-k). %t A329274 nmax = 27; CoefficientList[Series[1/(1 + Sum[EulerPhi[k] Log[1 - 2 x^k]/k, {k, 1, nmax}]), {x, 0, nmax}], x] %t A329274 a[0] = 1; a[n_] := a[n] = Sum[(1/k) DivisorSum[k, EulerPhi[#] 2^(k/#) &] a[n - k], {k, 1, n}]; Table[a[n], {n, 0, 27}] %Y A329274 Cf. A000010, A000031, A070933. %K A329274 nonn %O A329274 0,2 %A A329274 _Ilya Gutkovskiy_, Nov 11 2019