我正在为大型时间序列数据库(extract of the data)写一些绘图功能。我编写了一个代码,将所有参数(列)相对于链接到给定周期(数据帧)的时间(数据帧的第一列)作图。我正在使用循环一次绘制所有参数。问题是,当我调用使用包ggplot2的函数时,所需的34个图中只有20个图出现在不同的窗口中。我获得了plot of parameter 11(Gas_Flow_Mon_01)和plot of the last parameter 34(Timer_24_Resettable_Value)之间的所有图。我不知道问题是否出在我的代码内,还是使用ggplot2一次显示20个窗口的全部容量?我听说过诸如dev.off()之类的函数,但不知道它们是否有助于解决此问题。
# Function plotting all the parameters for one cycle using the indexes of the parameters and the cycle :
# `plot_cycle_allparameters_interactive()`
library(plotly)
library(tidyr)
plot_cycle_allparameters_interactive <- function(datafile,Cycle_index){
Cycle_name = names(datafile)[Cycle_index]
Cycle_data = datafile[[Cycle_name]]
# Cycle_data is the datafile studied that consists of multiple columns, each one representing a parameter
for(i in 2:length(Cycle_data)){
# looping through all the columns that represent a parameter
figure_interactive <- ggplot(Cycle_data, aes(x =Time,y = Cycle_data[,i], group= 1)) +
geom_line(color='blue')
print(ggplotly(figure_interactive))
dev.off()
}
}