r - 从字符串中提取字符

Question

您将如何提取所有字符直到指定的字符？对于给出的示例，我想提取“。”之前的所有内容。 (时期):

a<-c("asdasd.sss","segssddfge.sss","se.sss")

我想回来:

asdasd segssddfge se

我试过:

substr(a,1,".")

但它似乎不起作用。

有任何想法吗？

Answer 1

这是一个非常基本的方法:

sapply(strsplit(a, "\\."), `[[`, 1)
# [1] "asdasd"     "segssddfge" "se"

还有一个:

sub(".sss", "", a, fixed = TRUE)
# [1] "asdasd"     "segssddfge" "se" 
## OR sub("(.*)\\..*", "\\1", a) 
## And possibly other variations