The On-Line Encyclopedia of Integer Sequences (OEIS)

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

A266964

Expansion of Product_{k>=1} (1 - k*x^k)^k.
(history; published version)

#69 by Charles R Greathouse IV at Thu Sep 08 08:46:15 EDT 2022

PROG

(MAGMAMagma) m:=50; R<q>:=PowerSeriesRing(Rationals(), m); Coefficients(R! ( (&*[(1-k*q^k)^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

#68 by Susanna Cuyler at Mon Jun 24 20:09:24 EDT 2019

STATUS

proposed

approved

#67 by Seiichi Manyama at Mon Jun 24 11:38:04 EDT 2019

STATUS

editing

proposed

#66 by Seiichi Manyama at Mon Jun 24 11:37:31 EDT 2019

CROSSREFS

Cf. A022661, A026007, A266891, A266941, A266971, A296601.

STATUS

approved

editing

#65 by Bruno Berselli at Wed Oct 31 04:29:32 EDT 2018

STATUS

reviewed

approved

#64 by Michel Marcus at Wed Oct 31 04:29:22 EDT 2018

STATUS

proposed

reviewed

#63 by G. C. Greubel at Wed Oct 31 03:20:35 EDT 2018

STATUS

editing

proposed

#62 by G. C. Greubel at Wed Oct 31 03:20:31 EDT 2018

PROG

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

STATUS

proposed

editing

#61 by Muniru A Asiru at Wed Oct 31 02:49:46 EDT 2018

STATUS

editing

proposed

Discussion

Wed Oct 31

02:53

Michel Marcus: here too

#60 by Muniru A Asiru at Wed Oct 31 02:49:19 EDT 2018

MAPLE

seq(coeff(series(mul((1-k*x^k)^k, k=1..n), x, n+1), x, n), n = 0 .. 35); # Muniru A Asiru, Oct 31 2018

STATUS

proposed

editing