Question

我有一张桌子＆＃34;乘客＆＃34;列＆＃34; ID＆＃34;，＆＃34;名称＆＃34;，＆＃34;票价＆＃34;和＃34; TravelClass＆＃34;。＆＃34;票价＆＃34; vector缺少值。对于每个条目，我想替换＆＃34; Fare＆＃34;中的缺失值。乘以＆＃34; TravelClass＆＃34;的倍数值值。

在PseudoCode中：

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

R - 将缺失值替换为同一条目的另一个值

2 个答案: