Displaying 1 result from an estimated 1 matches for "corrcciandsmos2010".
2013 Jan 24
0
How to add a function to another written code?
...,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_tot,c(1,2),function(x){cor(x[,1],x[,2])})
to.write = file(paste("C:\\corrCCIandSMOS2010.bin",sep=""),"wb")
writeBin(as.double(resultsr), to.write, size = 4)
I am gratefull for any ideas
--
View this message in context: http://r.789695.n4.nabble.com/How-to-add-a-function-to-another-written-code-tp4656499.html
Sent from the R help mailing lis...