R10177/row_center.R
e0c09ada6d27master

row_center.R
View Options

			row_center <- function(X) {

			## Description: centers the matrix X by rows
			# Paras: X: matrix with rows to be centered.
			stopifnot(is.matrix(X))

			return (t(scale(x = t(X), center = T, scale = F)))
			}