regex - R 语言 : remove first character if equal to quotation mark

Question

R新手。我正在尝试从数据框中一行的开头和结尾删除，"。如果引号不是第一个或最后一个字符，我不想删除。我不确定为什么以下内容对我不起作用数据的数据框，其中每一行都是一个文本数据点。

引号不是字符串，而是文本的一部分。

数据框的一行看起来像这样:

x<-  '"hello world. She said, "hello again" it was a pleasant response"'

结果应该是:

x2 <- 'hello world. She said, "hello again" it was a pleasant response"'

我认为这会起作用:

gsub("\\n\"", "", df)

但是，这是行不通的。建议？

Answer 1

您可以像这样从字符串末尾删除引号:

x <- gsub('"$','',x)

从字符串的开头开始:

x <- gsub('^"','',x)

因为字符 $ 和 ^ 匹配字符串的结尾和开头。例如:

myData<-data.frame(foo=c('"asdf"','ASDF'),
                   bar=c('jkl;','"JKL;"'))
myData
#>     foo    bar
#>1 "asdf"   jkl;
#>2   ASDF "JKL;"

# trim the quote characters from myData$foo
myData$foo <- gsub("^\"|\"$", "", myData$foo)
myData

#>   foo    bar
#>1 asdf   jkl;
#>2 ASDF "JKL;"