1. ifelse(test, yes, no)
test为真,输出yes值,否则输出no值。
x <- c(1,1,1,0,0,1,1)
ifelse(x!=1, 1, 0) #x输出的值不等于1,若真则输出1,否则输出0
[1] 0 0 0 1 1 0 0
2. which(test)
返回test为真值的位置(指针)。
which(x!=1) #返回x中不等于1的变量值的位置
[1] 4 5
3. a %in% table
a值是否包含于table中,为真则输出TRUE,否则输出FALSE
x %in% 1
[1] TRUE TRUE TRUE FALSE FALSE TRUE TRUE
4. 联合使用
ifelse( x %in% 1, 1,0 ) #若x值包含在1里面,输出1,否则输出0
[1] 1 1 1 0 0 1 1
which(x %in% 1) #输出x包含在1中的值的位置
[1] 1 2 3 5 6