R.动物园。全天重复第一天的数据

【问题标题】：R. Zoo. Repeat the first day data through all the dayR.动物园。全天重复第一天的数据
【发布时间】：2010-08-25 11:42:50
【问题描述】：

我有一个动物园系列。持续10年，频率为15分钟。

我想获得一个新的动物园系列（或矢量）具有相同数量的元素，每个元素等于当天的第一个元素。也就是说，每天的第一个元素会在整个一天中重复。

这与 aggregate(originalseries,as.Date,head,1) 不同，因为它给出了一个向量，每天只有一个元素。

干杯

【问题讨论】：

既然你在 r-help 上得到了答案，你打算自己在这里回答吗？

标签： r zoo

【解决方案1】：

我得到了几个答案：

library(zoo) 
library(chron)

#1
zz <- z <- zoo(1:10, chron(0:9/5)) 
zz[] <- ave(coredata(z), as.Date(time(z)), FUN = function(x) head(x, 1)) 
cbind(z, zz)


#2
z <- zoo(1:10, chron(0:9/5)) 
z.ag <- aggregate(z, as.Date, head, 1) 
na.locf(z.ag, xout = time(z)) 


#3
z.na <- ifelse.zoo(!duplicated(as.Date(time(z))), z, NA) 
na.locf(z.na)

干杯

【讨论】：

您应该通过突出显示并单击小 010101 按钮将其格式化为“代码”。
并且还提供原始来源的链接。