Numeric 1st and 2nd order differentiation
use Math::Derivative qw(Derivative1 Derivative2);
@dydx=Derivative1(\@x,\@y);
@d2ydx2=Derivative2(\@x,\@y);
@d2ydx2=Derivative2(\@x,\@y,$yp0,$ypn);
This Perl package exports functions for performing numerical first (Derivative1) and second Derivative2) order differentiation on vectors of data. They both take references to two arrays containing the x and y ordinates of the data and return an array of the 1st or 2nd derivative at the given x ordinates. Derivative2 may optionally be given values to use for the first dervivative at the start and end points of the data - otherwiswe 'natural' values are used.
$Log: Derivative.pm,v $ Revision 1.1 1995/12/26 16:26:59 willijar Initial revision
Let me know.
John A.R. Williams <[email protected]>