r - 前两个之间的字符串 (.dots)

Question

嗨，有包含两个或更多点的数据。我的要求是从第一个点到第二个点获取字符串。
例如 string <- "abcd.vdgd.dhdsg"
结果 expected =vdgd
我用过

pt <-strapply(string, "\\.(.*)\\.", simplify =  TRUE)

它提供了正确的数据，但对于具有两个以上点的字符串，它无法按预期工作。
例如 string <- "abcd.vdgd.dhdsg.jsgs"它给出 dhdsg.jsgs 但预期是 vdgd
任何人都可以帮助我。

感谢和问候，

Answer 1

在基础 R 中，我们可以使用 strsplit

ss <- "abcd.vdgd.dhdsg"
unlist(strsplit(ss, "\\."))[2]
#[1] "vdgd"

或者使用 gregexpr 和 regmatches

unlist(regmatches(ss, gregexpr("[^\\.]+", ss)))[2]
#[1] "vdgd"

或者使用 gsub(感谢@TCZhang)

gsub("^.+?\\.(.+?)\\..*$", "\\1", ss)
#[1] "vdgd"