Displaying 2 results from an estimated 2 matches for "file_tot".
Did you mean:
file_t
2013 Feb 22
2
How to merge two functions into one?
I am using the code below to calculate the correlation map between two
datasets. This code worked fine.
dir1 <- list.files("D:thly", "*.bin", full.names = TRUE)
dir2 <- list.files("D:002", "*.envi", full.names = TRUE)
file_tot <- array(dim = c(1440, 720, 11, 2))
for(i in 1:length(dir1)) {
file_tot[, , i, 1] <- readBin(dir1[i], numeric(), size = 4,
n = 1440 * 720, signed = T)
file_tot[, , i, 2] <- readBin(dir2[i], numeric(), size = 4,...
2013 Jan 24
0
How to add a function to another written code?
...dir1 <- list.files("D:\\2010\\data\\monthly", "*.bin", full.names =
TRUE)
dir1<- mixedsort(dir1)
dir2 <- list.files("D:\\RE01\\MIR_CLF3MD\\2010\\final-2010",
"*.envi", full.names = TRUE)
dir2<- mixedsort(dir2)
file_tot<-array(dim=c(1440,720,12,2))
for(i in 1:length(dir1)){
file_tot[,,i,1] <- readBin(dir1[i], numeric(), size = 4 ,n = 1440 *
720 , signed = T)
file_tot[,,i,2] <- readBin(dir2[i], numeric(), size = 4 ,n = 1440 *
720 , signed = T)
}
resultsr<-apply(file_...