Я не могу запустить ваш код, потому что у меня нет вашего фрейма данных, но, возможно, причина в том, что вы пытаетесь ввести для l oop переменную diff_arbeitnehmer
. Я сделал это изменение и надеюсь, что знаю, что это работает:
i<-c(1:44)
diff_arbeitnehmer <- c()
for(x in i){
if(x == 44){
diff_arbeitnehmer[x] <- 0
} else{
diff_arbeitnehmer[x] <- 100/erwerbstaetige[x,2]*erwerbstaetige[x,4]-100/erwerbstaetige[x+1,2]*erwerbstaetige[x+1,4]
}
}
Совет - посмотреть, правильно ли выполнено задание в последнем условии, может быть, вам нужно поставить некоторые скобки.