OFFSET
1,4
COMMENTS
Related to sum of characters of Lie(n).
LINKS
Alois P. Heinz, Table of n, a(n) for n = 1..40
R. P. Stanley, Whitehouse
FORMULA
a(n) = Sum_{k=0..n(n-1)/2, k mod n=1} A232439(n,k). - Alois P. Heinz, Sep 15 2014
MATHEMATICA
descentset[t_?TableauQ]:=Sort[Cases[t, i_Integer /; Position[t, i+1][[1, 1]] > Position[t, i][[1, 1]], {2}]];
majorindex[t_?TableauQ]:=Tr[descentset[t]];
Table[Tr[Count[Tableaux[#], (q_/; Mod[majorindex[q], Tr[#]]==1) ]& /@ Partitions[n]], {n, 13}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Wouter Meeussen, Aug 04 2013
EXTENSIONS
Terms verified and more terms added, Joerg Arndt, Aug 04 2013
a(21)-a(24) from Alois P. Heinz, Aug 08 2013
a(25) from Alois P. Heinz, Aug 12 2013
a(26)-a(29) from Alois P. Heinz, Sep 15 2014
STATUS
approved