相关疑难解决方法(0)

我是否删除了某个行满足字符串匹配条件的数据框中的所有行？

例如:

A,B,C
4,3,Foo
2,3,Bar
7,5,Zap

如何返回排除C = Foo所有行的数据帧:

A,B,C
2,3,Bar
7,5,Zap

我想根据两个条件删除一些行。这是我的代码

test <-datasetjoin[!(datasetjoin$Occupation == "Clerical" & datasetjoin$AvgMonthSpend > 58.515 ),]  
test <- test[!(test$Occupation == "Management" & test$AvgMonthSpend > 59.24 ),] 
test <- test[!(test$Occupation == "Manual" & test$AvgMonthSpend > 54.28 ),] 
test <- test[!(test$Occupation == "Professional" & test$AvgMonthSpend > 60.08 ),]   
test <- test[!(test$Occupation == "Skilled Manual" & test$AvgMonthSpend > 57.06 ),] 
test <- test[!(test$NumberCarsOwned == "1" & test$YearlyIncome > (81300-51140) * 1.5 + 81300),] 

是否有可能以更优雅的方式获得相同的结果？

提前致谢

Occupation MonthlySpend 
Clerical   60           
Management 59           
Clerical   62           
Clerical   58           
Clerical   63              
Management 56 …

我正在处理一些美国政府数据,这些数据包含很长的城市和邮政编码列表.完成一些工作后,数据采用以下格式.

dat1 = data.frame(keyword=c("Bremen", "Brent", "Centreville, AL", "Chelsea, AL", "Bailytown, Alabama", "Calera, Alabama",
              "54023", "54024"), tag=c(rep("AlabamCity",2), rep("AlabamaCityST",2), rep("AlabamaCityState",2), rep("AlabamaZipCode",2)))
dat1

但是,某些关键字无法正常运行.因此,在下面的示例中,有两个"邮政编码"标记为"AlabamaCity"和"AlabamaCityState".出于某种原因,政府的原始数据集有几个拉链码,这些拉链码与其他邮政编码没有正确分组.

dat2 = data.frame(keyword=c("Bremen", "Brent", "50143", "Chelsea, AL", "Bailytown, Alabama", "52348",
              "54023", "54024"), tag=c(rep("AlabamCity",2), rep("AlabamaCityST",2), rep("AlabamaCityState",2), rep("AlabamaZipCode",2)))
dat2

我想知道如何迭代整个关键字列表并删除所有具有数值的行(它们实际上保存为字符值),这些行没有"AlabamaZipCode"标记.所以以前的数据应该看起来像.

dat3 = data.frame(keyword=c("Bremen", "Brent", "Chelsea, AL", "Bailytown, Alabama", "54023", "54024"), 
          tag=c(rep("AlabamCity",2), rep("AlabamaCityST",1), rep("AlabamaCityState",1), rep("AlabamaZipCode",2)))
dat3

挑战似乎是我想要保留某些数值以及我想要删除的其他数值.谁能帮忙.