Re: Maclaurin Series
- To: mathgroup at smc.vnet.net
- Subject: [mg48134] Re: [mg48114] Maclaurin Series
- From: Andrzej Kozlowski <akoz at mimuw.edu.pl>
- Date: Fri, 14 May 2004 20:58:50 -0400 (EDT)
- References: <200405140412.AAA04695@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
On 14 May 2004, at 13:12, Xiaolei Li wrote:
> 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
>
>
Probably you mean something like:
f1t[x_] := Block[{t}, Normal[Series[f1[t], {t, 0, 10}]] /. t -> x]
or maybe
f1t[x_] := Block[{t}, N[Normal[Series[f1[t], {t, 0, 10}]] /. t -> x]]
Andrzej Kozlowski
Chiba, Japan
http://www.mimuw.edu.pl/~akoz/
- References:
- Maclaurin Series
- From: Xiaolei Li <xli10@uiuc.edu>
- Maclaurin Series