找到＆amp;替换特定位置的角色

Question

Comment
(apple (a) 100)
(orange 50)



Comment1
apple (a) 100
orange 50

我需要更换开始的括号＆amp;使用r。

结束右括号

我的数据样本位于“评论”字段中。我的预期输出位于“Comment1”字段中。

Answer 1

我们可以使用gsub来匹配末尾（^\\(）或（|）的括号（\\)$），并将其替换为{{1 }}

""

或者如果它基于位置，我们可以放置捕获组中所需的字符，即括号内的字符（gsub("^\\(|\\)$", "", Comment) #[1] "apple (a) 100" "orange 50" ），并将其替换为反向引用（(.*)）。

\\1

或sub(".(.*).", "\\1", Comment) #[1] "apple (a) 100" "orange 50"

substring

数据

substring(Comment, 2, nchar(Comment)-1)
#[1] "apple (a) 100" "orange 50"