R语言
library(tidyverse)
x <- c('1','a','2','abc')
str_which(x,'a')
data=data.frame(row.names = c('QWE','TYE','WUN','EJN','JDB') ,Chinese = c(27, 88, 64,45, 67 ),Math = c(72, 68, 42, 29, 87 ),gender = c(1, 2, 1, 2, 1), bmi = c('正常','低体重','正常','超重','肥胖')
)
data[str_which(data$bmi,'正'),]
data$group <- 'Control'
data
a=str_which(data$bmi,'正')
data$group[a ] <- 'OSCC'
data
data$group[str_which(data$bmi,'正') ] <- 'OSCC2'
data
本文来自互联网用户投稿，文章观点仅代表作者本人，不代表本站立场，不承担相关法律责任。如若转载，请注明出处。 如若内容造成侵权/违法违规/事实不符，请点击【内容举报】进行投诉反馈！
