使用 DiagrammeR 在标签中包含引号和撇号

问：

我正在尝试使用在图形中节点的标签中包含撇号。假设我想创建标签 。问题是 DiagrammeR 似乎不接受双引号 （），因此，当我使用单引号时，它不起作用，因为撇号逃脱了整个事情。DagrammeRgrViz"Peter's car"""'Peter's car'

我试过使用 或 ，但似乎没有任何效果。\\\

library("DiagrammeR")
graph <- "
digraph names { 
graph [overlap = true, fontsize = 10]

node [shape = box,
        fontname = Helvetica,
        fontsize = 10]
  1 [label = 'Peter\\'s car']
  2 [label = 'Peter\'s Car']

1 -> 2
}
"
grViz(graph)

该图仅用于测试。它没有传达任何含义。

我希望在注释中看到标签“彼得的车”（没有双引号）

非常感谢。