r - 为什么我的代码行在字符串中给出了错误的字符位置

Question

我正在处理一个数据集，其中我的变量列的数据格式为 blah blah [text I actually want]。我已经写了一行来尝试用一个新的数据点替换变量列中的每个数据点，其中只有 我真正想要的文本。

我以为我终于破解了它，但到目前为止它似乎并没有真正起作用。

melted$variable = str_sub(
    melted$variable, start = gregexpr(
        pattern ="\\[",melted$variable)[1], end = (
            str_length(melted$variable) - 1
        )
    )

melted 是我的数据集，variable 是列名

Answer 1

我们可以使用 sub 并提取 [ 和 ] 之间的所有内容

sub(".*\\[(.*)\\].*", "\\1", x)
#[1] "ex1" "ex2"

或者使用str_extract

stringr::str_extract(x, "(?<=\\[).*(?=\\])")
#[1] "ex1" "ex2"

x 是

x <- c("blah blah [ex1]", "blah blah [ex2]")

可以用 melted$variable 代替。