R 如何独立于日期绘制POSIXct对象/时间戳?

R 如何独立于日期绘制POSIXct对象/时间戳?,r,datetime,plot,posixct,R,Datetime,Plot,Posixct,我希望这个问题的标题有意义。我正在用谷歌表格收集一些数据。表格始终在下午5点至7点之间提交,但在不同的日期提交。我想在x轴上绘制时间戳的time分量与表单中的其他值。我希望确保所有时间曲线图都在曲线图的相同两小时窗口中结束(即,下午5点到7点之间),而不管时间戳的日期部分 我已将响应下载为CSV,并且可以读取时间戳,没有任何问题: demo您可以尝试使用lubridate将小时和分钟数输出,然后重新格式化回POSIXct。这将用作POSIXct的默认原点,即当前日期 library(lubrid

我希望这个问题的标题有意义。我正在用谷歌表格收集一些数据。表格始终在下午5点至7点之间提交,但在不同的日期提交。我想在x轴上绘制时间戳的
time
分量与表单中的其他值。我希望确保所有时间曲线图都在曲线图的相同两小时窗口中结束(即,下午5点到7点之间),而不管时间戳的
日期
部分

我已将响应下载为CSV,并且可以读取时间戳,没有任何问题:


demo您可以尝试使用lubridate将小时和分钟数输出,然后重新格式化回POSIXct。这将用作POSIXct的默认原点,即当前日期

library(lubridate)
demo <- as.POSIXct(paste(hour(demo), minute(demo)), format = "%H %M") 
库(lubridate)

demo我会用regex
demo[grepl(“1[789](?=:\\d{2}:)”,demo,perl=T)]
破解它。但是您可以尝试使用
lubridate
chron
或另一种小时分钟格式设置方法。啊,这太完美了。这样,我可以把我所有的时间都转换成“今天”,它们都出现在同一个两小时的窗口中。我有点生气,我自己没有想到这一点-非常感谢你的帮助!
plot(demo, rnorm(length(demo)))
startTime <- as.POSIXct("17:00:00", format="%H:%M:%S")
endTime <- as.POSIXct("19:00:00", format="%H:%M:%S")
plot(demo, rnorm(length(demo)), xlim=c(startTime, endTime), xaxt='n')
axis.POSIXct(1, at = seq(startTime, endTime, by="hour"), format = "%M", labels=c("17:00", "18:00", "19:00"))
startTime <- as.POSIXct("10/12/2015 17:00:00", format="%m/%d/%Y %H:%M:%S")
endTime <- as.POSIXct("10/12/2015 19:00:00", format="%m/%d/%Y %H:%M:%S")
demo <- as.POSIXct(c("2015-10-12 17:02:42 CEST", "2015-10-12 17:02:46 CEST", "2015-10-12 17:02:46 CEST", "2015-10-12 17:02:50 CEST", "2015-10-12 17:02:52 CEST", "2015-10-12 17:02:55 CEST", "2015-10-12 17:02:58 CEST", "2015-10-12 17:03:02 CEST", "2015-10-12 17:03:09 CEST", "2015-10-12 17:03:15 CEST", "2015-10-12 17:03:22 CEST", "2015-10-12 17:03:24 CEST", "2015-10-12 17:03:36 CEST", "2015-10-12 17:03:48 CEST", "2015-10-12 17:04:07 CEST", "2015-10-12 17:09:20 CEST"))
library(lubridate)
demo <- as.POSIXct(paste(hour(demo), minute(demo)), format = "%H %M")