R: Как включить остатки lm обратно в data.frame?

Question

Я пытаюсь поставить остатки от пленки обратно в исходное data.frame:

fit <- lm(y ~ x, data = mydata, weight = ind) 
mydata$resid <- fit$resid 

Вторая линия будет нормально работать, если остаток имеет ту же длину, как количество строк MyData. Однако, в моем случае, некоторые из элементов ind: NA. Поэтому остаточная длина обычно меньше числа строк. Также fit$resid - это вектор «числовой», поэтому для меня нет метки, чтобы объединить его с mydata data.frame. Есть ли элегантный способ достичь этого?

Answer 1

Я думаю, что это должно быть довольно легко, если ind - это всего лишь вектор.

sel <- which(!is.na(ind)) 
mydata$resid <- NA 
mydata$resid[sel] <- fit$resid