The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A288423 (Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing entries 1-10 | older changes

A288423

Expansion of Product_{k>=1} 1/(1 + x^k)^(sigma_3(k)).
(history; published version)

#27 by Charles R Greathouse IV at Thu Sep 08 08:46:19 EDT 2022

PROG

(MAGMAMagma) m:=40; R<q>:=PowerSeriesRing(Rationals(), m); Coefficients(R! ( (&*[1/(1+q^k)^DivisorSigma(3, k): k in [1..m]]) )); // G. C. Greubel, Oct 30 2018

Discussion

Thu Sep 08

08:46

OEIS Server: https://oeis.org/edit/global/2944

#26 by Bruno Berselli at Wed Oct 31 04:29:40 EDT 2018

STATUS

reviewed

approved

#25 by Michel Marcus at Wed Oct 31 04:24:29 EDT 2018

STATUS

proposed

reviewed

#24 by G. C. Greubel at Wed Oct 31 03:24:57 EDT 2018

STATUS

editing

proposed

#23 by G. C. Greubel at Wed Oct 31 03:24:47 EDT 2018

PROG

(PARI) m=5040; x='x+O('x^m); Vec(prod(k=1, m+2, , 1/(1+x^k)^sigma(k, 3))) \\ G. C. Greubel, Oct 30 2018

(MAGMA) m:=5040; R<q>:=PowerSeriesRing(Rationals(), m); Coefficients(R! ( (&*[1/(1+q^k)^DivisorSigma(3, k): k in [1..(m+2)]]) )); // G. C. Greubel, Oct 30 2018

STATUS

reviewed

editing

#22 by Michel Marcus at Wed Oct 31 03:18:30 EDT 2018

STATUS

proposed

reviewed

#21 by Muniru A Asiru at Wed Oct 31 03:03:38 EDT 2018

STATUS

editing

proposed

#20 by Muniru A Asiru at Wed Oct 31 03:02:17 EDT 2018

MAPLE

with(numtheory): seq(coeff(series(mul(1/(1+x^k)^(sigma[3](k)), k=1..n), x, n+1), x, n), n = 0 .. 30); # Muniru A Asiru, Oct 31 2018

STATUS

proposed

editing

#19 by G. C. Greubel at Wed Oct 31 00:18:10 EDT 2018

STATUS

editing

proposed

Discussion

Wed Oct 31

02:56

Michel Marcus: why m+2 : is it really needed ?

#18 by G. C. Greubel at Wed Oct 31 00:17:50 EDT 2018

PROG

(PARI) m=50; x='x+O('x^m); Vec(prod(k=1, m+2, 1/(1+x^k)^sigma(k, 3))) \\ G. C. Greubel, Oct 30 2018

(MAGMA) m:=50; R<q>:=PowerSeriesRing(Rationals(), m); Coefficients(R! ( (&*[1/(1+q^k)^DivisorSigma(3, k): k in [1..(m+2)]]) )); // G. C. Greubel, Oct 30 2018

STATUS

approved

editing