Displaying 2 results from an estimated 2 matches for "newindata".
Did you mean:
newdata
2006 Nov 20
2
problem with loop to put data into array with missing data for some files
...{days.mon <- 31}
if(dt.mon==08){days.mon <- 31}
if(dt.mon==10){days.mon <- 31}
if(dt.mon==12){days.mon <- 31}
if(dt.mon==04){days.mon <- 30}
if(dt.mon==06){days.mon <- 30}
if(dt.mon==09){days.mon <- 30}
if(dt.mon==11){days.mon <- 30}
sec.mon <- days.mon*24*60*60
newindata <- paste("newindata.",i, j, mon2, sep="")
newindata <- sec.mon*indata
k<-k+1
data.out$date[k] <- paste(i, j, mon2, sep="")
data.out$data[k,] <- newindata
}
}
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Jennifer Barnes
PhD student - long range drought predic...
2006 Nov 20
3
problem with loop to put data into array with missing data forsome files
...days.mon <- 31}
> if(dt.mon==10){days.mon <- 31}
> if(dt.mon==12){days.mon <- 31}
> if(dt.mon==04){days.mon <- 30}
> if(dt.mon==06){days.mon <- 30}
> if(dt.mon==09){days.mon <- 30}
> if(dt.mon==11){days.mon <- 30}
> sec.mon <- days.mon*24*60*60
>
> newindata <- paste("newindata.",i, j, mon2, sep="")
> newindata <- sec.mon*indata
>
> k<-k+1
> data.out$date[k] <- paste(i, j, mon2, sep="")
> data.out$data[k,] <- newindata
>}
>}
>
>
>~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
>Jennifer Ba...