我想做两件事：
1）我想在里面创建一个带双引号的字符串。 R中的一个例子如下所示：
x <- 'vjghvbh"kljnj"kjbn"jk'
[1] "vjghvbh\"kljnj\"kjbn\"jk"
问题1：如何在没有反斜杠的情况下创建这样的字符串？
我尝试使用gsub()，但不幸的是，这并没有奏效。我还找到了一些建议cat()的来源，但这只是打印我的角色，但不会将其存储在x中。
2）让我们假设我解决了问题1.然后我的角色将如下所示：
[1] "vjghvbh"kljnj"kjbn"jk"
现在我需要找到双引号的位置。根据{{3}}我尝试了gregexpr()。但是，这也没有用，因为我无法指定pattern。
问题2：如何在字符串中找到双引号的位置？
R中的结果应如下所示：
[1] 8 14 19