用R字符串中的双引号替换简单引号

Question

如何用R中的文本字符串中的双引号替换简单的引号？

此方法无法在字符串中添加反斜杠：

threestrings <- "green', 'green', 'brown"
stringr::str_replace_all(string = threestrings, pattern = "', '", replacement = "\", \"")
[1] "green\", \"green\", \"brown"

所需的输出：    [1]“绿色”，“绿色”，“棕色”
最终目标是制作“三串”的向量。