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.

A307602 Expansion of Product_{k>=1} (1 + x^k/(1 + x)).

This page as a plain text file.
%I A307602 #14 Sep 16 2019 07:45:59
%S A307602 1,1,0,2,-1,4,-2,5,-1,4,3,-2,16,-21,47,-62,104,-131,191,-229,304,-344,
%T A307602 420,-437,477,-413,336,-76,-270,927,-1792,3155,-4904,7402,-10519,
%U A307602 14694,-19761,26226,-33847,43162,-53776,66178,-79679,94562,-109606,124618,-137468,147061
%N A307602 Expansion of Product_{k>=1} (1 + x^k/(1 + x)).
%H A307602 Seiichi Manyama, <a href="/A307602/b307602.txt">Table of n, a(n) for n = 0..500</a>
%F A307602 G.f.: exp(Sum_{k>=1} x^k * Sum_{d|k} (-1)^(d+1) / (d*(1+x)^d)).
%t A307602 nmax = 50; CoefficientList[Series[Product[(1 + x + x^k)/(1 + x), {k, 1, nmax}], {x, 0, nmax}], x] (* _Vaclav Kotesovec_, Sep 16 2019 *)
%o A307602 (PARI) N=66; x='x+O('x^N); Vec(prod(k=1, N, 1+x^k/(1+x)))
%o A307602 (PARI) N=66; x='x+O('x^N); Vec(exp(sum(k=1, N, x^k*sumdiv(k, d, (-1)^(d+1)/(d*(1+x)^d)))))
%Y A307602 Cf. A126348, A307599, A307601.
%K A307602 sign
%O A307602 0,4
%A A307602 _Seiichi Manyama_, Apr 18 2019