相关疑难解决方法(0)

我定期进行一组测量,但有些测量结果丢失了:

      measurement_date value
1  2011-01-17 13:00:00     5
2  2011-01-17 13:04:00     5
3  2011-01-17 13:08:00     7
4  2011-01-17 13:12:00     8
5  2011-01-17 13:16:00     4
6  2011-01-17 13:24:00     6
7  2011-01-17 13:28:00     5
8  2011-01-17 13:32:00     6
9  2011-01-17 13:36:00     9
10 2011-01-17 13:40:00     8
11 2011-01-17 13:44:00     6
12 2011-01-17 13:48:00     6
13 2011-01-17 13:52:00     4
14 2011-01-17 13:56:00     6

我有一个函数,它将处理值并可以处理缺少的值,但行必须在那里,所以我生成一个每分钟有一行的数组,如下所示:

times <- timeSequence(from=.., length=60, by="min")

现在我每小时都有一行,但我需要合并数据.我试过这样的事情,但不能完全正确:

lapply(times, function(time) {
    n <- as.numeric(time)
    v <- Position(function(candidate) {
        y <- as.numeric(candiated)
        n …