Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2004
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2004

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

Search the Archive

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




  • Prev by Date: Re: A question about sort
  • Next by Date: Re: Precision of output
  • Previous by thread: Re: Maclaurin Series
  • Next by thread: Gauss Egregium theorem