0

像这样查看数据框：

set.seed(3)
Data1<-rnorm(20, mean=20)
Dir_1<-rnorm(20,mean=2)
Data2<-rnorm(20, mean=21)
Dir_2<-rnorm(20,mean=2)
Data3<-rnorm(20, mean=22)
Dir_3<-rnorm(20,mean=2)
Data4<-rnorm(20, mean=19)
Dir_4<-rnorm(20,mean=2)
Data5<-rnorm(20, mean=20)
Dir_5<-rnorm(20,mean=2)
Data6<-rnorm(20, mean=23)
Dir_6<-rnorm(20,mean=2)
Data7<-rnorm(20, mean=21)
Dir_7<-rnorm(20,mean=2)
Data8<-rnorm(20, mean=25)
Dir_8<-rnorm(20,mean=2)
Index<-rnorm(20,mean=5)
DF<-data.frame(Data1,Dir_1,Data2,Dir_2,Data3,Dir_3,Data4,Dir_4,Data5,Dir_5,Data6,Dir_6,Data7,Dir_7,Data8,Dir_8,Index)

我最终得到一个数据框，每个观察值包含两列数据（基于观察值 1-8）和一个索引。基于这个指数，我想删除（或做 NA）某些数据观察。

举个例子：

如果索引大于 5，则删除该行中的观察 8（数据和目录）

如果索引大于 4，则删除该行中的观测值 7 和 8

如果索引大于 3 且小于 3.5，则在该行中删除 6、7、8

我希望提出一系列“if”语句，让我根据索引值删除每一行的列。

4

1 回答 1

1

假设您想要的不是“删除一行的列”而是将 NA 放入特定行的正确列中，您需要使用一些索引向量而不是一系列if语句：

DF[DF$Index>3 & DF$Index<3.5, (6*2-1):(8*2)] <- NA
DF[DF$Index>4, (7*2-1):(8*2)] <- NA
DF[DF$Index>5, (8*2-1):(8*2)] <- NA
于 2013-03-20T22:18:53.493 回答