Skip to main content
Source Link
ciao
  • 26k
  • 2
  • 62
  • 145

Ah, came across this from the "related" bar, time for a necro :-}

Here's a direct and fast one-liner:

numSST[t_, s_] := Block[{p = Normal[Times @@ (1 + x^s) + O[x]^(t + 1)], x = 1}, p]; 
Post Made Community Wiki by ciao