Los valores de las derivadas de
orden superior necesarios para
este programa se calculan
numéricamente basándose en
los métodos de "Numerical
Differentiation of Analytic
Functions," de J. N. Lyness y C.
B. Moler, SIAM Journal of
Numerical Analysis 4 (1967):
202-210.
Programa: series de Taylor
Cuando ejecuta este programa, puede introducir una función y especificar el orden y el punto
que se toma como centro. El programa calcula la aproximación de la serie de Taylor para la
función y dibuja la función que ha introducido. En este ejemplo se muestra cómo llamar a un
programa desde otro programa como una subrutina.
Antes de introducir el programa
el indicador
Name=
y, después, introduzca este breve programa para almacenar la serie de Mobius. El
programa
llama a este programa y lo ejecuta como una subrutina.
TAYLOR
PROGRAM:MOBIUS
:{1,L1,L1,0,L1,1,L1,0,0,1,L1,0,L1,1,1,0,L1,0,L1,0}¶MSERIES
:Return
Seleccione
EDIT
en el menú PRGM, introduzca
este programa para calcular la serie de Taylor.
H
está en el menú
CHAR GREEK
El usuario introduce la función
El usuario introduce el orden
El usuario introduce el centro
en el menú PRGM, introduzca
TAYLOR
, seleccione
EDIT
TAYLOR
en el indicador
PROGRAM:TAYLOR
:Func:FnOff
:y14=pEval(TPOLY,xNcenter)
:GrStl(14,2)
L9¶H:.1¶rr
:1
E
:ClLCD
:InpSt "FUNCTION: ",EQ
:St8Eq(EQ,y13)
:Input "ORDER: ",order
:order+1¶dimL TPOLY
:Fill(0,TPOLY)
:Input "CENTER: ",center
Capítulo 19: Aplicaciones
MOBIUS
Name=
y, después, introduzca
291
en