 
 
 
 
 
 
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

