Warning: file_get_contents(/data/phpspider/zhask/data//catemap/6/jenkins/5.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 匹配字符串中的第一个单词_R - Fatal编程技术网

R 匹配字符串中的第一个单词

R 匹配字符串中的第一个单词,r,R,我有以下R程序 Test<-"CLC2" %in% "CLC2,CLC2,CLC2" Test Test1<-"CLC2" %in% "CLC2" Test1 测试尝试 或 第二个在每个,字符处拆分字符串 编辑 如果您只想查看第一个值,那么它应该是 "CLC2" %in% strsplit("CLC2,CLC2,CLC2", ",")[[1]][1] "CLC2" %in% c("CLC2", "CLC2", "CLC2")[1] 正如@Pierrelaffortune所指出的那

我有以下R程序

Test<-"CLC2" %in% "CLC2,CLC2,CLC2"
Test
Test1<-"CLC2" %in% "CLC2"
Test1
测试尝试

第二个在每个
字符处拆分字符串

编辑 如果您只想查看第一个值,那么它应该是

"CLC2" %in% strsplit("CLC2,CLC2,CLC2", ",")[[1]][1]
"CLC2" %in% c("CLC2", "CLC2", "CLC2")[1]

正如@Pierrelaffortune所指出的那样。在这种情况下,您不需要%
中的
%,但也可以使用
=
,因为您只是将一个值与另一个值进行比较

您可以在字符串中找到一个单词,并(如有必要)检查它是否是字符串的第一个单词

gregexpr(pattern = "CLC2","CLC2,CLC2,CLC2")[[1]][1] == 1
你也可以试试

 grepl('\\<CLC2\\>', unlist(strsplit("CLC2,CLC2,CLC2", ","))[1])
#[1] TRUE
grepl('\\',unlist(strsplit(“CLC2,CLC2,CLC2”,“,”))[1])
#[1] 真的

也可能
'CLC2'==sub(“,*”,“,“CLC2,CLC2,CLC2”)
gregexpr(pattern = "CLC2","CLC2,CLC2,CLC2")[[1]][1] == 1
 grepl('\\<CLC2\\>', unlist(strsplit("CLC2,CLC2,CLC2", ","))[1])
#[1] TRUE