R语言中有两个数据框
怎么组合成一个这样的 按时间t的顺序排列
矩阵我会转了,谢谢!
怎样把下面的程序用R语言简化 提高运行速度呢
for(i in 1:length(dt)){ for(j in 1:length(df$t)){ if(dt[i]==df$t[j]){ if(is.na(t[i])) t[i]<-as.vector(df$t[j]) if(is.na(date[i])) date[i]<-as.vector(df$date[j]) if(is.na(time[i])) time[i]<-as.vector(df$time[j]) } } if(is.na(t[i])&&i==1) t[i]<-0 else if(is.na(t[i])) t[i]<-t[i-1] if(is.na(date[i])&&i==1) date[i]<-0 else if(is.na(date[i])) date[i]<-date[i-1] if(is.na(time[i])&&i==1) time[i]<-0 else if(is.na(time[i])) time[i]<-time[i-1]
}
矩阵我会转了,谢谢!
怎样把下面的程序用R语言简化 提高运行速度呢
for(i in 1:length(dt)){
for(j in 1:length(df$t)){
if(dt[i]==df$t[j]){
if(is.na(t[i])) t[i]<-as.vector(df$t[j])
if(is.na(date[i])) date[i]<-as.vector(df$date[j])
if(is.na(time[i])) time[i]<-as.vector(df$time[j])
}
}
if(is.na(t[i])&&i==1) t[i]<-0 else if(is.na(t[i])) t[i]<-t[i-1]
if(is.na(date[i])&&i==1) date[i]<-0 else if(is.na(date[i])) date[i]<-date[i-1]
if(is.na(time[i])&&i==1) time[i]<-0 else if(is.na(time[i])) time[i]<-time[i-1]
}