R 如何从apply.monthly函数中提取日期
如果我有一组每日数据,我想得到每个月的最小值,以及该值出现的日期。如果我使用R 如何从apply.monthly函数中提取日期,r,xts,R,Xts,如果我有一组每日数据,我想得到每个月的最小值,以及该值出现的日期。如果我使用apply.monthly函数,它会给出最小值,但相应的日期是每个月的月末,而不是实际发生的日期。我怎样才能得到正确的日期 library(xts) #create sample data dates<-seq(from=as.Date("1970-01-01"),to=as.Date("1970-12-31"),by=1) x<-sample(1:365,365) ts<-xts(x,dates)
apply.monthly
函数,它会给出最小值,但相应的日期是每个月的月末,而不是实际发生的日期。我怎样才能得到正确的日期
library(xts)
#create sample data
dates<-seq(from=as.Date("1970-01-01"),to=as.Date("1970-12-31"),by=1)
x<-sample(1:365,365)
ts<-xts(x,dates)
#apply function
monthly.mins<-apply.monthly(ts,min)
monthly.mins
库(xts)
#创建示例数据
日期应用。每月使用期间。应用,并始终在每个期间的结束处编制索引。如果需要不同的行为,则需要使用更通用的函数
在这种情况下,您可以将lappy(split(),…)
习惯用法与自定义函数一起使用:
do.call(rbind, lapply(split(ts,"months"), function(x) x[which.min(x)]))