cp's OEIS Frontend

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.

A081543 G.f.: Sum_{k >= 1} x^k/(1-x^k)^(k+1).

This page as a plain text file.
%I A081543 #24 Sep 03 2019 12:06:58
%S A081543 1,3,4,8,6,17,8,24,20,32,12,76,14,51,72,97,18,158,20,213,142,101,24,
%T A081543 491,152,132,248,479,30,915,32,681,398,206,828,1859,38,249,600,2560,
%U A081543 42,2692,44,1686,2864,347,48,6166,1766,3405,1192,2811,54,6796,4424,9987
%N A081543 G.f.: Sum_{k >= 1} x^k/(1-x^k)^(k+1).
%H A081543 Seiichi Manyama, <a href="/A081543/b081543.txt">Table of n, a(n) for n = 1..10000</a> (terms 1..999 from Harvey P. Dale)
%F A081543 If p is prime then a(p)=p+1.
%F A081543 a(n) = Sum_{d|n} binomial(d-1+n/d,d). - _R. J. Mathar_, Feb 21 2009
%t A081543 With[{nn=50},CoefficientList[Series[Sum[x^k/(1-x^k)^(k+1),{k,nn}],{x,0,nn}],x]] (* _Harvey P. Dale_, May 28 2017 *)
%o A081543 (PARI) a(n)=if(n<1,0,polcoeff(sum(k=1,n,1/(1-x^k)^k,x*O(x^(n^2))),n))
%Y A081543 Cf. A157019.
%K A081543 nonn
%O A081543 1,2
%A A081543 _Benoit Cloitre_, Apr 21 2003
%E A081543 Description corrected by _Vladeta Jovovic_, Aug 22 2003
%E A081543 Corrected offset _R. J. Mathar_, Feb 21 2009