在R中的列中的特殊字符之间提取信息

Question

很抱歉，因为我觉得这个问题的版本已被问过很多次，但我根本无法从其他示例中找到适用于这种情况的代码。我有一列，我想要的所有信息都存储在两组“%%”之间，我想在两组括号之间提取这些信息并将其放入一个新列中，在本例中称为 df$empty .

这是一个很长的专栏，但在所有情况下，我只需要括号之间的信息。有没有办法在整个专栏中对此进行编码？

具体来说，我希望在此示例中有一个看起来像“信息”、“通缉令”的新列。

empty <- c('NA', 'NA')
information <- c('notimportant%%information%%morenotimportant', 'ignorethis%%wanted%%notthiseither')

df <- data.frame(information, empty)

Answer 1

在这种情况下你可以这样做：

df$empty <- sapply(strsplit(df$information, '%%'), '[', 2)

#                                   information       empty
# 1 notimportant%%information%%morenotimportant information
# 2           ignorethis%%wanted%%notthiseither      wanted

也就是说，将文本拆分为 '%%' 并获取结果向量的第二个元素。