ich habe ein Problem mit einer Schleife. Die Ausgangssituation sind zwei Vektoren
Code: Alles auswählen
a<-c(1:10)
b<-c(0.5*(1:10))
1.Iteration:
0.5*a[1] -> in Vektor c speichern
b[1]-a[1] -> in Vektor d speichern
2.Iteration:
0.5*d[1] -> in Vektor c speichern
b[2]-d[1] -> in Vektor d speichern
usw.
Nun habe ich folgende Schleife versucht um dieses Problem zu lösen:
Code: Alles auswählen
a<-c(1:10)
b<-c(0.5*(1:10))
temp<-0
temp<-a
N<-10
c<-numeric(0)
d<-numeric(0)
for(i in 1:N){
c<-c(d,0.5*res[1])
d<-oos[i]-c[i]
temp<-c(tail(d,1),head(temp,-1))}
c = 0.5, 0, 0.5, 0.5, 0.75
d = 0, 1, 1, 1.5, 1.75
Bei meiner Schleife kommt folgendes heraus:
Code: Alles auswählen
c
[1] NA 0.5
d
[1] NA NA NA NA NA NA NA NA 0.5 0.0
Vielen Dank im Voraus und viele Grüße,
wintwin111