R ошибка х и у длины отличаются

Question

Я пытаюсь построить решение в ОДУ в R, и я напечатал:

dx=0.01 
x=seq(-5,5,by=dx) 
A=0.5 
B=1 
C=-2 
length(Y)=length(x)-2 
Y=x*0 
Y[1]=A 
Y[2]=dx*B+A 
for(k in 1:(length(x)-3))(C*dx^2-1)*Y[k]+2*Y[k+1] 
plot(x[1:(length(x)-2)],Y,type="l",col="blue") 

Он показывает мне ошибку:

Error in xy.coords(x, y, xlabel, ylabel, log) : 'x' and 'y' lengths differ 

Answer 1

Линии 6 и 7 необходимо переключить. Вы не можете изменить длину переменной до ее создания. Кроме того, я думаю, вы хотели назначить вывод цикла for переменной.

dx=0.01 
x=seq(-5,5,by=dx) 
A=0.5 
B=1 
C=-2 
Y=x*0 
length(Y)=length(x)-2 
Y[1]=A 
Y[2]=dx*B+A 
for(k in 1:(length(x)-3))(C*dx^2-1)*Y[k]+2*Y[k+1] 
plot(x[1:(length(x)-2)],Y,type="l",col="blue")