A086796 a(n) is the number of terms in the expansion of (x+y+z)*(x^2+y^2+z^2)*(x^3+y^3+z^3)*...*(x^n+y^n+z^n).
3, 9, 24, 60, 130, 247, 429, 697, 1075, 1590, 2272, 3154, 4272, 5665, 7375, 9447, 11929, 14872, 18330, 22360, 27022, 32379, 38497, 45445, 53295, 62122, 72004, 83022, 95260, 108805, 123747, 140179
Offset: 1
Keywords
Crossrefs
Cf. A000124.
Programs
-
Maple
A086796 := proc(n) mul( x^i+y^i+z^i,i=1..n) ; expand(%) ; nops([coeffs(%)]) ; end proc: # R. J. Mathar, Sep 15 2012
-
Mathematica
Table[Length[Expand[Times@@Table[Total[{x,y,z}^n],{n,m}]]],{m,40}] (* Harvey P. Dale, Sep 04 2018 *)