Group Abstract Group Abstract

Message Boards Message Boards

0
|
7.4K Views
|
1 Reply
|
1 Total Like
View groups...
Share
Share this post:

Calculate and plot the following Taylor series?

Posted 6 years ago

Can someone please tell me whats wrong with this?

[Series[
    func, {x, a, n}]];
 {Plot[
   {func, expansion},
   {x, -2 Pi, 2 Pi},
   PlotRange \[RightArrow] {{-2 Pi, 2 Pi}, {yMin, yMax}}],

  Expand[expansion],
  n "degree polynomial around the point x=",
  a},
 {{n, 3}, 1, 25, 1},
 {{func, Sin[x], "Function in terms of x"}},
 {{a, 0}, -5, 5},
 {yMin, -4}, {yMax, 4}]
POSTED BY: Lucky El

Almost everything. That is not "Mathematica-speach".

What do you want to do? This perhaps?

n = 5;
func = Sin[x];
f1 = Series[func, {x, a, n}]
f2 = f1 /. a -> .3
expansion = Normal[f2]
Plot[{func, expansion}, {x, -2 Pi, 2 Pi}, PlotRange -> {{-2 Pi, 2 Pi}, {-3, 3}}]
POSTED BY: Hans Dolhaine
Reply to this discussion
Community posts can be styled and formatted using the Markdown syntax.
Reply Preview
Attachments
Remove
or Discard