Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
EulerEx2
# Dada a equação # y'(t)=1+y(t)^2 # y(0)=1 y0=1 F<-function(s,u){1+u^2} # Estimar y(0.5) pelo método de Euler. a=0 b=0.5 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(t){tan(t+atan(1))} curve(f,a,b,col="blue") points(t,y,col="red")
run
|
edit
|
history
|
help
0
waves 2
iris
Dasi
Mann Whitney wilcoxon test
Multiple barplot
17-08-2020Ex2.1.1
AjusteLinearizado-09-01-21
Bootstrap for Gaussian Distribution
kroneckereq
jessray