我试图根据多列中的值删除数据集中的特定行。仅当满足所有3列中的条件时,才应删除一行。
这是我的代码:
test_dff %>%
filter(contbr_nm != c('GAITHER, BARBARA', 'PANIC, RADIVOJE', 'KHAN, RAMYA') &
contbr_city != c('APO AE', 'PORSGRUNN', 'NEW YORK') &
contbr_zip != c('9309', '3924', '2586'))
Run Code Online (Sandbox Code Playgroud)
此代码应删除我表中的12行。相反,它删除了其中的绝大多数。我怀疑,只要满足条件之一,它就会删除所有可能的行。
是否有更好的解决方案,还是我必须使用此处描述的方法?
我需要分别指定每个组合吗?这样吗 这种方法还会删除太多行,因此也是错误的。
test_dff %>%
filter((contbr_nm != 'GAITHER, BARBARA' & contbr_city != 'APO AE' & contbr_zip != '9309') &
(contbr_nm != 'PANIC, RADIVOJE' & contbr_city != 'PORSGRUNN' & contbr_zip != '3924') &
(contbr_nm != 'KHAN, RAMYA' & contbr_city != 'NEW YORK' & contbr_zip != '2586') )
Run Code Online (Sandbox Code Playgroud)
如果我专注于仅基于一个变量删除行,则这段代码有效:
test_dff %>%
filter(contbr_zip != c('9309')) %>%
filter(contbr_zip != c('3924')) %>%
filter(contbr_zip != c('2586'))
Run Code Online (Sandbox Code Playgroud)
为什么这种方法行不通?
test_dff %>%
filter(contbr_zip != c('9309','3924','2586'))
Run Code Online (Sandbox Code Playgroud)
非常感谢你的帮助。
这是一种基于连接的方法 - 所有项目必须完全匹配。
main <- read.csv(text = "
id,name,city,zip
1,mary,new york,10017
2,jonah,new york,10016
3,tamil,manhattan,10019
4,vijay,harlem,10028
")
excludes <- read.csv(text = "
name,city,zip
jonah,new york,10016
vijay,harlem,10028
")
library(dplyr)
anti_join(main, excludes)
# id name city zip
# 1 3 tamil manhattan 10019
# 2 1 mary new york 10017
Run Code Online (Sandbox Code Playgroud)
调整第二个问题(未测试)
test_dff %>%
filter(!((contbr_nm == 'GAITHER, BARBARA' & contbr_city == 'APO AE' & contbr_zip == '9309') |
(contbr_nm == 'PANIC, RADIVOJE' & contbr_city == 'PORSGRUNN' & contbr_zip == '3924') |
(contbr_nm == 'KHAN, RAMYA' & contbr_city == 'NEW YORK' & contbr_zip == '2586') ))
Run Code Online (Sandbox Code Playgroud)