Question

我有一个如下所示的数据框：

library(zoo)
head(monthly.station6)

                    [,1]
1995-02-28 00:00:00 2.07
1995-03-01 00:00:00 5.70
1995-04-30 01:00:00 0.65
1995-05-31 01:00:00 1.03
1995-06-30 01:00:00 0.77
1995-07-31 01:00:00 0.39

我正在应用此代码：monthly.station6[,0] <- as.yearmon(monthly.station6[,0])尝试将其转换为年月格式，但我认为日期列为[，0]的事实正在阻止它吗？不知道我哪里出错了，任何帮助都会受到赞赏！

head(monthly.station6)

             [,1]
Feb 1995 2.07
Mar 1995 5.70
Apr 1995 0.65
May 1995 1.03
Jun 1995 0.77
Jul 1995 0.39

按要求dput(head(monthly.station6))：

structure(c(2.07, 5.7, 0.65, 1.03, 0.77, 0.39), .indexCLASS = c("POSIXct", 
"POSIXt"), .indexTZ = "", tclass = c("POSIXct", "POSIXt"), tzone = "", class = c("xts", 
"zoo"), index = structure(c(793929600, 794016000, 799200000, 
801878400, 804470400, 807148800), tzone = "", tclass = c("POSIXct", 
"POSIXt")), .Dim = c(6L, 1L))

Answer 1

1）索引对象的类是"xts"，而不是"data.frame"。使用index（或time）修改monthly.station6：

library(xts)
index(monthly.station6) <- as.yearmon(index(monthly.station6))

2）aggregate.zoo 另一种可能性是使用aggregate.zoo。这将返回"zoo"对象，因此将其转换回"xts"：

library(xts)
as.xts(aggregate(monthly.station6, as.yearmon))

3）fortify.zoo 由于问题提到data.frame，如果您真正想要的是data.frame，那么library之后的第一个语句将创建一个data.frame第一列Index，第二列将执行转换为"yearmon"：

library(xts)
DF <- fortify.zoo(monthly.station6)
transform(DF, Index = as.yearmon(Index))

注意：如果您只想要一年，则它不能是xts对象，但您可以将其表示为data.frame。使用（3）中的DF：

transform(DF, Index = as.numeric(format(Index, "%Y")))

日期转换为.yearmon

1 个答案: