R/designRaster.R

Defines functions designRaster

Documented in designRaster

designRaster <-
function(R,book){
ncb<-ncol(book)
ncr<-ncol(R)
y<-book[R$EU,]
z<-cbind(R,y)
out <-agricolae::tapply.stat(z[,2:3],z[,(ncr+1):(ncr+ncb)])
return(list(design=out,rasterField=z))
}

Try the rPAex package in your browser

Any scripts or data that you put into this service are public.

rPAex documentation built on Nov. 2, 2023, 6:22 p.m.