powered by
rectscale(X, rect) rectunscale(X, rect)
matrix
data.frame
X
ncol(X)
X <- matrix(runif(10, 1, 3), ncol=2) rect <- rbind(c(1,3), c(1,3)) Xs <- rectscale(X, rect) rectunscale(Xs, rect)
Run the code above in your browser using DataLab