如何查看存儲圖（ggplot）的代碼

Question

我想知道是否可以查看存儲在變量中的圖的代碼。例如，給出下面的情節：

library(ggplot2) 

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

我想有一個函數「seeCode」返回用於構建劇情的實際代碼：

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

Answer 1

信息不被保留。沒有從ggplot對象到生成它的代碼的一對一映射，就像沒有辦法知道「5」是從「3 + 2」還是「4 + 1」來的一樣。