On Jun 27, 2013, at 8:04 PM, Kaptue Tchuente, Armel wrote: > Hi there, > > I would like to know how to change the line "img=as.single(rnorm(m)))" such > that instead of being a vector of length m as it is now, img is an array of > dimension c=(n,m,o) for instance > > --------------------------------- > read_ts<-function(n,m,o,img) { > out<-.Fortran("read_ts", > as.integer(n), > as.integer(m), > as.integer(o), > img=as.single(rnorm(n))) > return(out$img) > ------------------------------------------ >
Well, assuming that the 'out$img' object has a R-length of n*m*o , wouldn't if be simpler to just change the return call to: return( array( out$img, dim=c(n,m,o) ) I don't think you wnat start naming your dimension vectors "c". -- David Winsemius Alameda, CA, USA ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.