R - 用相同條目的另一個值替換缺失值

Question

我有一個列表「乘客」列「ID」，「名稱」，「票價」和「TravelClass」。 「票價」向量缺少值。對於每個條目，我想用其「TravelClass」值的乘積值替換「票價」中的缺失值。

僞代碼：

For each i in Passengers{ 
if(is.na(i.Fare)){ 
    i.Fare = i.Class*10 
} 
} 

任何幫助的歡迎！

Answer 1

使用within可能是避免Passengers data.frame反覆引用的簡便方法，即：

Passengers <- within(Passengers,Fare[is.na(Fare)] <- TravelClass[is.na(Fare)]*10) 

Answer 2

也許：

Passengers$Fare[is.na(Passengers$Fare)] <- Passengers$Class[is.na(Passengers$Fare)]*10