FUNCTION: partitions[vecptns] - generate vector partitions
CALLING SEQUENCE: vecptns(n)
PARAMETERS: n - positive integer
GLOBAL VARIABLES: NONE
SYNOPSIS:
Generates a list of vector-partitions of n.
A vector partitions is an element of DP x P x P
where DP is the set of partitions into distinct parts, and
P is the set of unrestricted partitions
EXAMPLES:
> with(partitions):
> V:=vecptns(4):
> m:=matrix(nops(V),3):
> for i from 1 to nops(V) do
> m[i,1]:=V[i]:
> m[i,2]:=vpw(V[i]):
> m[i,3]:=vpcrank(V[i]):
> od:
#Table of vector partitions of 4 with weight and crank
> print(m);
[[[], [], [1, 1, 1, 1]] 1 -4]
[ ]
[ [[], [], [1, 1, 2]] 1 -3]
[ ]
[ [[], [], [2, 2]] 1 -2]
[ ]
[ [[], [], [1, 3]] 1 -2]
[ ]
[ [[], [], [4]] 1 -1]
[ ]
[ [[], [1], [1, 1, 1]] 1 -2]
[ ]
[ [[], [1], [1, 2]] 1 -1]
[ ]
[ [[], [1], [3]] 1 0]
[ ]
[ [[], [1, 1], [1, 1]] 1 0]
[ ]
[ [[], [1, 1], [2]] 1 1]
[ ]
[ [[], [2], [1, 1]] 1 -1]
[ ]
[ [[], [2], [2]] 1 0]
[ ]
[ [[], [1, 1, 1], [1]] 1 2]
[ ]
[ [[], [1, 2], [1]] 1 1]
[ ]
[ [[], [3], [1]] 1 0]
[ ]
[[[], [1, 1, 1, 1], []] 1 4]
[ ]
[ [[], [1, 1, 2], []] 1 3]
[ ]
[ [[], [2, 2], []] 1 2]
[ ]
[ [[], [1, 3], []] 1 2]
[ ]
[ [[], [4], []] 1 1]
[ ]
[ [[1], [], [1, 1, 1]] -1 -3]
[ ]
[ [[1], [], [1, 2]] -1 -2]
[ ]
[ [[1], [], [3]] -1 -1]
[ ]
[ [[1], [1], [1, 1]] -1 -1]
[ ]
[ [[1], [1], [2]] -1 0]
[ ]
[ [[1], [1, 1], [1]] -1 1]
[ ]
[ [[1], [2], [1]] -1 0]
[ ]
[ [[1], [1, 1, 1], []] -1 3]
[ ]
[ [[1], [1, 2], []] -1 2]
[ ]
[ [[1], [3], []] -1 1]
[ ]
[ [[2], [], [1, 1]] -1 -2]
[ ]
[ [[2], [], [2]] -1 -1]
[ ]
[ [[2], [1], [1]] -1 0]
[ ]
[ [[2], [1, 1], []] -1 2]
[ ]
[ [[2], [2], []] -1 1]
[ ]
[ [[1, 2], [], [1]] 1 -1]
[ ]
[ [[3], [], [1]] -1 -1]
[ ]
[ [[1, 2], [1], []] 1 1]
[ ]
[ [[3], [1], []] -1 1]
[ ]
[ [[1, 3], [], []] 1 0]
[ ]
[ [[4], [], []] -1 0]
DISCUSSION:
This table of the 41 vector partitions of 4 with weight and crank
SEE ALSO: vpcrank, vpw