3 replies to this topic

[Felipe Riquelme]

numero de iteraciones"
it+1⇒ite
InputFunc f(x),"ingrese la Funci?n"
input a,"ingrese x₀"
input b,"ingrese x₁"
fill(1,ite,3)⇒z
For 3⇒l To ite
For 4⇒k To ite
For 1⇒i To ite
For 1⇒j To 2
n⇒z[1,1]
xn⇒z[1,2]
Error⇒z[1,3]
absoluto⇒z[2,3]
a⇒z[2,2]
b⇒z[3,2]
i-2⇒z[i,1]
f(z[k-1,2])(z[k-2,2]-z[k-1,2])⇒o
f(z[k-2,2])-f(z[k-1,2])⇒p
(z[k-1,2]-(o/p))⇒c
c⇒z[k,2]
abs((z[l,2]-z[l-1,2])/z[l,2])?100⇒ea
ea⇒z[l,3]
Next
Next
Next
Next
PrintNatural z, "metodo de la Secante"

al ingresar la funcion e^(-x^2)-x
con x0= 0 ; x1= 1 da la sig matriz los valores son correctos pero el tiempo en el cp manager 3 son rapidos pero en la classpad resolver unas 7 iteraciones puede llevar horas.

n xn, Error
0 0, absoluto
1 1, 100
2 0.612699836781, 63.21205588267
3 0.653442133288, 6.235027469379
4 0.6529172652475, 0.08038813926923
5 0.6529186403823, 2.106134998863E-4
6, 0.6529186404193, 5.666872927846E-9

la otra manera que lo programe pero sin error absoluto fue atravez de secuencias.-

InputFunc f(x),"Ingrese la Funcion"
Input a₀,"Inicio Intervalo","x₀"
Input a₁,"Fin Intervalo","x₁"
SeqType "an₊₂a₀"
"an+₁-(f(an+₁)?(an-an+₁))/(f(an)-f(an+₁))"⇒an+₂
0⇒SqStart
10⇒SqEnd
DispSeqTbl
[url="http://%5burl="http://www2.udec.cl/~friquelme/sec.bmp"%5dhttp://www2.udec.cl/~friquelme/sec.bmp"]http://www2.udec.cl/~friquelme/sec.bmp[/url]

que es mucho mas rapida da como una iteraci?n por minuto.-
pero aun no lo he pensado como programar los otros metodos como el de punto fijo new raphson. Como matriz podria hacerlo pero no se si seran los ciclos For que lo hace extremadamente lento.-
para descargarlos

http://www.udec.cl/~...e/numericos.vcp" target="_blank">
http://www.udec.cl/~...e/numericos.vcp
si alguien puede colaborar con metodos mas rapidos se lo agradeceria

[Gualberto Soto Sivila]

El mejor metodo que podrias usar es el de Newton Raphson de primer orden o Newton Raphson de segundo orden.

[omegavirus]

Si deseas programar m?todos num?ricos y deseas velocidad lo mejor es programar en CPLua, te tomara algo de tiempo ya que debes leer el manual pero si estas acostumbrado a usar C++ no habr? ning?n problema. Las ventajas son que es much?simo mas r?pido que CASIO Basic y que de hecho existen ya muchas herramientas para trabajar como LNA (Lua Numerical Analisys) hecho por PAP (te recomiendo te pongas en contacto con el ya que es un experto en la materia pero aqu? el lenguaje universal de la ciencia es el ingles)

CPLua: http://www.casiocalc.org/?showforum=19

LNA: http://www.casiocalc...?showtopic=2340

PAP: http://www.casiocalc.org/?showuser=964

If you want to program faster use CPLua not basic...

PAP is the best reference for numerical analisys...

[PAP]

PAP is the best reference for numerical analisys...

Thank you very much, omegavirus; I didn't knew I'm that good.