OFFSET
1,2
FORMULA
1/5!*(sigma[1](n)^5 + 10*sigma[1](n)^3*sigma[2](n) + 20*sigma[1](n)^2*sigma[3](n) + 15*sigma[1](n)*sigma[2](n)^2 + 30*sigma[1](n)*sigma[4](n) + 20*sigma[2](n)*sigma[3](n) + 24*sigma[5](n)).
MATHEMATICA
CIP5 = CycleIndexPolynomial[SymmetricGroup[5], Array[x, 5]]; a[n_] := CIP5 /. x[k_] -> DivisorSigma[k, n]; Array[a, 28] (* Jean-François Alcover, Nov 04 2016 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladeta Jovovic, Feb 08 2002
STATUS
approved