如何查看存储图的代码（ggplot）

Question

我想知道是否可以看到存储在变量中的绘图代码。例如，给出以下图：

library(ggplot2)

myData <- data.frame(x=1:100, y = 100:1)
myPlot <- ggplot(myData, aes(x,y)) + geom_line()

我想要一个功能＆＃34; seeCode＆＃34;返回用于构建绘图的实际代码：

>seeCode(myPlot)
  ggplot(myData, aes(x,y)) + geom_line()

Answer 1

该信息未被保留。不是从ggplot对象到生成它的代码的一对一映射，就像没有办法知道＆＃34; 5＆＃34;来自＆＃34; 3 + 2＆＃34;或＆＃34; 4 + 1＆＃34;。