如何从CSV中减去时间小时

Question

我试图在我的数据的最后一栏中删除一个小时后的时间。我试过使用润滑油包装，但它只是不适合我。任何解决方案都会有帮助！提亚

​

Answer 1

这个问题可能可以在导入时修复，设置时区(请参阅雷克雷文献)。

导入后，您可以以秒为单位减去对应的时间，就像time -3600 (因为一小时有3600秒)，然后可以使用lubridate将其转换回如下所示：

data$Time <- lubridate::seconds_to_period(as.numeric(data$Time-3600)) 

为了回到之前的格式，在上一步之后，您可以使用如下内容重新格式化：

library("lubridate")
data$Time <- lubridate::seconds_to_period(as.numeric(data$Time-3600)) 
data$Time <- sprintf('%02d:%02d:%02d', hour(data$Time), minute(data$Time), second(data$Time))