在 R 中添加 1 分钟以复制夏令时

Add 1 minute to duplicate daylight savings hour in R

我在 R 中有一个如下所示的数据框:

dput(样本,控制= NULL):

list(date_time = c(1446339600, 1446343200, 1446343200, 1446346800, 
1446350400), id = c(1, 1, 1, 1, 1), test = c("0.9", "0.64", "0.7", 
"0.72", "0.88"))

实际数据框有 1,217,048 行,其中有许多重复日期,但它按 date_time 排序,然后按 id 排序,类似于我提供的示例。我试图通过添加 1 分钟之类的操作来使第二次出现的夏令时有所不同,这样每隔一段时间你就会看到“2015-11-01 02:00:00”,它会变成类似“2015-11-01”的内容02:01:00'。我需要它有所不同,以便我可以查询数据库中的小时数,而无需对两个小时的数据求和。执行此类操作的最佳方法是什么?

m = data.frame(date_time = c(1446339600, 1446343200, 1446343200, 1446346800, 
                       1446350400), id = c(1, 1, 1, 1, 1), test = c("0.9", "0.64", "0.7", 
                                                                    "0.72", "0.88"))
m$date_time = as.POSIXct((m$date_time + ave(m$date_time, m$date_time, FUN = seq_along) - 1) * 60, origin = "1970-01-01")
m
#            date_time id test
#1 4719-12-18 06:00:00  1  0.9
#2 4719-12-20 18:00:00  1 0.64
#3 4719-12-20 18:01:00  1  0.7
#4 4719-12-23 06:00:00  1 0.72
#5 4719-12-25 18:00:00  1 0.88