rstudio中的图是否保存到索引中？

Question

我有一个可以在RStudio中创建许多绘图的函数。我想轻拂功能中出现的第一个图，而不必一次用向右/向左箭头逐页浏览每个图。

在R Studio中滚动查看绘图有哪些选项。理想情况下，我将能够执行plot [1]并从头开始绘制整个图。是否可以转到情节提示的开头？

让我充满希望的部分以及我问的原因是，我偶尔会收到一个服务器错误，内容为“服务器错误：无效的打印索引”

这是一个可重复的例子

library('mlbench')
data(BostonHousing)
Boston <- BostonHousing

ExploreNumeric <- function(df){
  num_vars <- which(sapply(df, is.numeric))
  X <- df[names(num_vars)]
  for (i in 1:length(names(num_vars))){
    Y <- as.data.frame(X[i])
    Z <- colnames(Y)
    print(summary(Y))
    Q <- quartiles(Y)
    print(Q[1])
    S <- c(sapply(Y,mean),sapply(Y,sd),kurtosis(Y),skewness(Y))
    S <- round(S,2)
    R <- c("mean","stdev","kurtosis","skewness")
    print(rbind(R,S))
    colnames(Y) <- "col"
    Hist <- ggplot(Y,aes(col)) + geom_histogram()
    Dens <- ggplot(Y,aes(col)) + geom_density()
    Box <- ggplot(Y,aes("col",col)) + geom_boxplot() 
    Scatter <- ggplot(Y,aes(seq_along(col),col)) + geom_point()
    G <- ggarrange(Hist,Dens,Box,Scatter, ncol=2,nrow=2)
    print(annotate_figure(G, top=Z))
  }
}

ExploreNumeric(Boston)

我的目标是能够回溯到该函数创建的第一个图表。