Question

当我使用cut（tmp $ time，＆＃34; sec＆＃34;）继续

时

       time lasting  elec
39 2013-04-18 13:06:25 8355222 -66.4
40 2013-04-18 13:06:25 8696122 -20.9
41 2013-04-18 13:06:27 9310817 -21.2
42 2013-04-18 13:06:25 9715650 -21.0
43 2013-04-18 13:06:26  338875 -29.6

结果显示

[1] 2013-04-18 13:06:25 2013-04-18 13:06:25 2013-04-18 13:06:27 2013-04-18 13:06:25
[5] 2013-04-18 13:06:25

但我认为[5]应该是2013-04-18 13：06：26。问题是什么？

Answer 1

此工作正常，您可能需要检查日期格式。

library(lubridate)
df <- data.frame(time = ymd_hms(c('2013-04-18 13:06:25',
                                  '2013-04-18 13:06:25',
                                  '2013-04-18 13:06:27',
                                  '2013-04-18 13:06:25',
                                  '2013-04-18 13:06:26' )))

cut(df$time, "sec")

[1] 2013-04-18 13:06:25 2013-04-18 13:06:25 2013-04-18 13:06:27 2013-04-18 13:06:25
[5] 2013-04-18 13:06:26
Levels: 2013-04-18 13:06:25 2013-04-18 13:06:26 2013-04-18 13:06:27

功能剪切（xxx，＆＃34; sec＆＃34;）没有正确地缩短秒

1 个答案: