Multivariate Taylor series expansion in Mathematica

Mathematica seems to be missing a function for this, or I开发者_JAVA百科 can't find it anyway.

The Series function can do expansion in succession for multiple variables, but it doesn't seem capable of doing a full multivariate expansion.

Does anyone know how to do this?

Thanks

---

This question is not clear to me. Do you mean something like this, where you get terms up to some specified total degree?

f[x_, y_] := Sin[x*y^2] + x^4*y - 3*x*Cos[y] - x^2*y^3

Normal[Series[f[x*t, y*t], {t, 0, 5}]] /. t -> 1
(*
->  -3*x + x^4*y + (5*x*y^2)/2 - x^2*y^3 - (x*y^4)/8
*)

Daniel Lichtblau