Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
EulerEx3
# Dada a equação # y'(t)=y(t)^3/3 # y(2)=7 y0=7 F<-function(s,u){u^3/3} # Estimar y(10) pelo método de Euler. a=2 b=1 n=100 h=(b-a)/n y=0*(0:n) y[1]=y0 # y(0)=1 é o y_0 nas notas. for ( i in 1:n){ y[i+1]=y[i]+h*F(a+i*h,y[i]) # y(c+h)=y(c)+hy'(c)+Erro } t=seq(a,b,by=h) # Como conhecemos y=f(t), que é f<-function(s){ 1/(sqrt(s-2+1/49)) } curve(f,a,b,col="blue") points(t,y,col="red")
run
|
edit
|
history
|
help
0
Test
19-08-2020-JacobiSistema
Football weights
Data frame
SimulacaoItaly-17-02-2021-linearizado
Sample R program of all basic functions
Gab1A(resumido)
16-09-2020IntPoli
26-08-2020AjusteCurvaLinearizab
Fractal Fourier