mysql - R:ifelse 中的字符串列表

Question

我正在寻找类似于 MySQL 中的“where 'var' in (...)”语句的东西。

我的代码如下:

data<-data.frame(id=10001:10030,cc1=rep(c("a","b","c"),10))
attach(data)
data$new<-ifelse(cc1=="a"|cc1=="b",1,0)

在 ifelse 中包含字符串列表而不是使用 | 的更好方法是什么？ ？

类似于:ifelse(cc1 in ('a','b'),1,0)

非常感谢!

Answer 1

ifelse(cc1 %in% c("a", "b"), 1, 0)

或者简单地说:

as.numeric(data$cc1 %in% c("a", "b"))

虽然避免使用attach。这让事情变得一团糟。