RE: Maclaurin Series

*To*: mathgroup at smc.vnet.net*Subject*: [mg48223] RE: [mg48114] Maclaurin Series*From*: "David Park" <djmp at earthlink.net>*Date*: Tue, 18 May 2004 04:17:05 -0400 (EDT)*Sender*: owner-wri-mathgroup at wolfram.com

Xiaolei, Use Normal. f1[x_] := Cos[x] f1t[x_] := Normal[Series[f1[x], {x, 0, 10}]] f1t[x] 1 - x^2/2 + x^4/24 - x^6/720 + x^8/40320 - x^10/3628800 David Park djmp at earthlink.net http://home.earthlink.net/~djmp/ From: Xiaolei Li [mailto:xli10 at uiuc.edu] To: mathgroup at smc.vnet.net hi, i have some function defined in f1. i'd like to define a new function, f1t, that is the Maclaurin expansion of f1. when i do something like: Series[f1[x], {x, 0, 10}] it gives me the correct expansion. but how do i define f1t? i tried: f1t[x_] := Series[f1[x], {x, 0, 10}] that doesn't work because it evaluates f1[x] before giving it to Series[]. i also tried something like: f1t[x_] := Evaluate[ Series[f1[x], {x, 0, 10}] ] but that didn't work either. i'm a mathematica n00b. any help is greatly appreciated. thx. -- Xiaolei Li | xli10 at uiuc.edu | www.xiaolei.org