Question

我试图在3小时内绘制每5秒的数据。我有时间戳数据和压力值如下。我的目的是每5秒收集一次数据并每3小时绘制一次

我有以下数据，我试图绘制

    Timestamp          Outlet_Pressure
2016-09-12 04:48:45        0.91
2016-09-12 04:48:50        0.92
2016-09-12 04:48:55        0.91
2016-09-12 04:49:00        0.91
2016-09-12 04:49:05        0.92
2016-09-12 04:49:10        0.92
2016-09-12 04:49:15        0.91
  ....                      ....

(data for 3hrs)

为此，我尝试了以下

#Fetch the timestamp data 
plottime <- as.POSIXct(pumpdata_perday_df$TIME_STAMP, "%y-%m-d %H:%M:%S" )
pressure <- pumpdata_perday_df$OUTLET_PRESSURE

#Define Margins. 
par(mar=c(5, 8, 4, 4) + 0.1)

#Plot the time series.
xlim <- seq(min(plottime), max(plottime), by = "sec")
plot(plottime, pressure, axes=F, ylim=c(0,max(pressure)), xlab = "", ylab = "", type = "l", col = "black", main="", xlim = xlim)
points(plottime, pressure, pch=20, col= "black")
axis(2, ylim = c(0,max(pressure)), col= "black", lwd=2)
mtext(2, text= "Outlet Pressure", line = 2)

但是在运行时我收到以下错误

Error in plot.window(...) : invalid 'xlim' value

我哪里错了？如何绘制一个图形，该图形在x轴上每5秒有一个时间戳，在y轴上有值

在R中绘制时间序列数据

0 个答案: