[go: up one dir, main page]

login
Revision History for A115728 (Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing entries 1-10 | older changes
Number of subpartitions of partitions in Abramowitz and Stegun order.
(history; published version)
#21 by N. J. A. Sloane at Fri Jan 22 21:24:22 EST 2021
STATUS

proposed

approved

#20 by Michel Marcus at Fri Jan 22 06:34:16 EST 2021
STATUS

editing

proposed

#19 by Michel Marcus at Fri Jan 22 06:32:30 EST 2021
FORMULA

For a partition P = [p_1,...,p_n] with the p_i in increasing order, define b(i,j) to be the number of subpartitions of [p_1,...,p_i] with the i-th part = j (b(i,0) is subpartitions with less than i parts). Then b(1,j)=1 for j<=p_1, b(i+1,j) = Sum_{k=0}^..j} b(i,k) for 0<=j<=p_{i+1}; and the total number of subpartitions is sum_{k=1}^{..p_n} b(n,k).

STATUS

proposed

editing

#18 by Geoffrey Critzer at Fri Jan 22 06:29:13 EST 2021
STATUS

editing

proposed

#17 by Geoffrey Critzer at Fri Jan 22 06:28:16 EST 2021
STATUS

proposed

editing

#16 by Michel Marcus at Mon Jan 11 02:54:06 EST 2021
STATUS

editing

proposed

Discussion
Thu Jan 21
22:21
N. J. A. Sloane: The A-numbers that you mention should also be listyed in the cross-references
#15 by Michel Marcus at Mon Jan 11 02:44:14 EST 2021
EXAMPLE

Partition 5 in A&S order is [2,1]; it has 5 subpartitions: [], [1], [2], [1^2] and [2,1] itself.

[], [1], [2], [1^2] and [2,1] itself.

PROG

(PARI) /* Expects input as vector in increasing order - e.g. [1, 1, 2, 3] */

(PARI) /* Expects input as vector in increasing order - e.g. [1, 1, 2, 3] */ subpart(p)=local(i, j, v, n); n=matsize(p)[2]; if(n==0, 1, v=vector(p[n]+1); v[1] =1; for(i=1, n, for(j=1, p[i], v[j+1]+=v[j])); for(j=1, p[n], v[j+1]+=v[j]); v[p[n ]+1])

STATUS

reviewed

editing

Discussion
Mon Jan 11
02:54
Michel Marcus: is this a tabf sequence ?
#14 by Joerg Arndt at Mon Jan 11 02:02:58 EST 2021
STATUS

proposed

reviewed

#13 by Michel Marcus at Sun Jan 10 11:38:23 EST 2021
STATUS

editing

proposed

#12 by Michel Marcus at Sun Jan 10 11:38:19 EST 2021
PROG

(PARI) /* Given Partition p(), Find Subpartitions s(): */ {s(n)=polcoeff(x^n-sum(k=0, n-1, s(k)*x^k*(1-x+x*O(x^n))^p(k)), n)} - _\\ _Paul D. Hanna_, Jul 03 2006

STATUS

proposed

editing