如何在R中将匹配数据分离成一个数据并将不匹配数据分离成另一个数据帧

Question

我有以下数据，

R1 <- c("15515","5156",NA,NA, "2857")
RC <- c("ACC","ZXC","ACC","QWZ","ACC")
R2 <- c(515,5156.11-,415-,1455-,886)
df <- data.frame(R1,RC,R2, stringsAsFactors = F)

我的条件是，R1 不应该包含 NA 并且 RC 只是 ACC，要捕获到 df1 并将剩余数据放入另一个数据框 df2。

我尝试做子集但无法获得所需的输出。

这可以在一个实例中创建这样两个数据帧（df1 和 df2）吗？

Answer 1

您可以将这两个条件（!is.na(df$R1)、df$RC == "ACC"）与& 结合起来，并使用结果一次，因为它是df 的子集，另一次使用! 否定。

i <- !is.na(df$R1) & df$RC == "ACC"
df1 <- df[i,]
df2 <- df[!i,]
df1
#     R1  RC  R2
#1 15515 ACC 515
#5  2857 ACC 886
df2
#    R1  RC       R2
#2 5156 ZXC 5156.11-
#3 <NA> ACC     415-
#4 <NA> QWZ    1455-

如果您在df$RC 中有NA：

i <- is.na(df$R1) | (is.na(df$RC) | df$RC != "ACC")
df1 <- df[!i,]
df2 <- df[i,]