Re: Finding derivatives of a list?
- To: mathgroup at smc.vnet.net
- Subject: [mg40821] Re: Finding derivatives of a list?
- From: bobhanlon at aol.com (Bob Hanlon)
- Date: Mon, 21 Apr 2003 06:51:23 -0400 (EDT)
- References: <b7qp61$3jq$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Needs["Graphics`Colors`"];
Table of function at equally spaced points
data= Table[{x,x(x-2)(x+3)}, {x,-4, 3, .25}];
Defining an interpolating function from the points
f= Interpolation[data];
Plot[{f[x], f'[x],f''[x]}, {x,-4,3},
PlotStyle->{Blue, Green, Red}];
The second derivates at the points:
{#,f''[#]}& /@ data[[All,1]]
Bob Hanlon
In article <b7qp61$3jq$1 at smc.vnet.net>, <siegman at stanford.edu> wrote:
<<
Subject: Finding derivatives of a list?
From: AES/newspost <siegman at stanford.edu>
To: mathgroup at smc.vnet.net
Date: Sat, 19 Apr 2003 06:09:05 +0000 (UTC)
Specific problem is how to generate a list of values of the second
derivative of a relatively smooth function at a set of equally spaced
points, when the function itself is known only as a list of numerical
values at those same points?
--
"Power tends to corrupt. Absolute power corrupts absolutely."
Lord Acton (1834-1902)
"Dependence on advertising tends to corrupt. Total dependence on
advertising corrupts totally." (today's equivalent)
>><BR><BR>