在r中循環創建圖形

Question

我是r的新手，希望能夠使用循環函數來創建圖形。

我希望創建288個圖表，數據采用堆疊格式。 每個圖表都是由30行數據創建的，因此我的數據總共有288 * 30 = 8640行。

我設法使用此代碼創建第一個圖表 -

 # setting range and table
 xrange <- range(0,300)
  yrange <- range(1,15)
  plot(xrange, yrange, type="n", xlab="Time in seconds", ylab="Performance")

# adding lines
lines(df$TimeStamp0[1:30],df$Pur[1:30], type="o", pch=4, col="red")
lines(df$TimeStamp0[1:30],df$Yel[1:30], type="o", pch=4, col="blue")
lines(df$PartTimeStamp0[1:30],df$PartPur[1:30], type="o", pch=20, col="green")
lines(df$PartTimeStamp0[1:30],df$PartYel[1:30], type="o", pch=20, col="orange")

四個不同的性能組件有四行。 我希望創建一個循環來獲取此語法，以便在整個數據集中每30行生成一個圖形。 我嘗試了“for loop”命令（見下文），但無法使其工作。

for(i in 1:288) {
   startRow=1, endRow=startRow+29
   #pasted the above graph creation syntax
   }

我真的很感激任何幫助，謝謝!!

Answer 1

由於您需要每30行一個圖表，因此您不希望使用范圍1：288; 相反，你應該使用：

for(i in seq(1, 8640, by=30){

此外，您需要將“startRow = 1”中的“1”更改為“i”，即

startRow=i
endRow=startRow+29