mat <- cbind(time = 1:10, matrix(runif(30, 0, 10), ncol = 3))
# Range normalization with automatic stat computation
norm_mat1 <- compute_normalize(mat, "range")
# Reuse stats for another matrix
mat2 <- cbind(time = 1:10, matrix(runif(30, 5, 15), ncol = 3))
norm_mat2 <- compute_normalize(mat2, "range", attr(norm_mat1, "ref_stats"))
Run the code above in your browser using DataLab