MathGroup Archive 2004

[Date Index] [Thread Index] [Author Index]

Search the Archive

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/


  • Prev by Date: RE : Maclaurin Series
  • Next by Date: Re: Maclaurin Series
  • Previous by thread: Maclaurin Series
  • Next by thread: Re: Maclaurin Series