我正在使用此代码计算时差。
ctym <- lapply(G, function(x) x[k,2])
y <- lapply(G, function(x) x[j,2])
t1 <- c(y,ctym)
dt1 <- as.POSIXct(t1)
dtyme <- difftime(dt1[2],dt1[1],units = "mins")
t1的输出是:
[[1]]
time_occurred
"2013-04-01 20:27:18"
[[2]]
time_occurred
"2013-04-01 20:27:48"
我得到的错误是: as.POSIXct.default(t1)出错: 不知道如何转换&#39; t1&#39;上课“POSIXct”
这里有什么问题?
答案 0 :(得分:2)
t1不是POSIXct对象。我想这可能是目前的清单。你需要做点什么......
t1 <- as.POSIXct(unlist(t1), format = "%y-%m-%d H:M:S"))
....让t1
以正确的格式进行数学运算。
如果您使用paste()
代替c()
来合并数据,则可能不需要这样做,但如果没有您的数据,我们无法真正说出来。
如果您可以发布一些数据,我们可以看到我们可以做什么:)