The On-Line Encyclopedia of Integer Sequences (OEIS)

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

A000991

Number of 3-line partitions of n.
(history; published version)

#59 by Michael De Vlieger at Fri Oct 27 18:03:15 EDT 2023

STATUS

proposed

approved

#58 by Jon E. Schoenfield at Fri Oct 27 18:03:00 EDT 2023

STATUS

editing

proposed

#57 by Jon E. Schoenfield at Fri Oct 27 18:02:57 EDT 2023

LINKS

Alois P. Heinz and Vaclav Kotesovec, <a href="/A000991/b000991.txt">Table of n, a(n) for n = 0..6000</a> (first 1000 terms from Alois P. Heinz)

STATUS

approved

editing

#56 by Charles R Greathouse IV at Thu Sep 08 08:44:28 EDT 2022

PROG

(MAGMAMagma) m:=50; R<x>:=PowerSeriesRing(Integers(), m); Coefficients(R!( (1-x)^2*(1-x^2)/(&*[1-x^j: j in [1..2*m]])^3 )); // G. C. Greubel, Dec 06 2018

Discussion

Thu Sep 08

08:44

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

#55 by Peter Luschny at Sat Mar 14 17:43:27 EDT 2020

STATUS

proposed

approved

#54 by Peter Luschny at Sat Mar 14 17:41:50 EDT 2020

STATUS

editing

proposed

#53 by Peter Luschny at Sat Mar 14 17:40:50 EDT 2020

PROG

list(s)

s.coefficients()

STATUS

approved

editing

Discussion

Sat Mar 14

17:41

Peter Luschny: more tweak... Everything is a list. Why not a nice name?

#52 by Alois P. Heinz at Sat Mar 14 17:40:07 EDT 2020

STATUS

proposed

approved

#51 by F. Chapoton at Sat Mar 14 17:34:20 EDT 2020

STATUS

editing

proposed

#50 by F. Chapoton at Sat Mar 14 17:34:12 EDT 2020

PROG

(Sage)

R = PowerSeriesRing(ZZ, 'x')

x = R.gen().O(50)

(Sage) s =( (1-x)^2 * (1-x^2) / prod(1-x^j for j in (1..60))^3).series(x, 50); s.coefficients(x, sparse=False) # _G. C. Greubel_, Dec 06 2018

list(s)

# G. C. Greubel, Dec 06 2018

STATUS

approved

editing

Discussion

Sat Mar 14

17:34

F. Chapoton: little tweak in sage code