0
我有以下结构的时间序列数据:天在列的行和几个月融进时间R系列
dat=data.frame("Year"=rep(2005,31),
"Day"=seq(1:31),
"JANUARY"=sample(seq(1:100),31,T),
"FEBRUARY"=c(sample(seq(1:100),28),NA,NA,NA),
"MARCH"=sample(seq(1:100),31),
"APRIL"=c(sample(seq(1:100),30),NA),
"MAY"=sample(seq(1:100),31),
"JUNE"=c(sample(seq(1:100),30),NA),
"JULY"=sample(seq(1:100),31),
"AUGUST"=sample(seq(1:100),31),
"SEPTEMBER"=c(sample(seq(1:100),30),NA),
"OCTOBER"=sample(seq(1:100),31),
"NOVEMBER"=c(sample(seq(1:100),30),NA),
"DECEMBER"=sample(seq(1:100),31)
我能想到的最接近的是由日和年
melt(dat,id.vars=c("Day","Year"))
融化数据
胁迫到日期
dat$Date<-paste(dat$Day,dat$variable,dat$Year,sep="-")
dat$Date<-as.Date(dat$Date,"%d-%B-%Y")
dat<-dat[which(is.na(pm25$Date)!=T),]
有没有做任何的这种更有效的和非笨的办法?