powered by
PROJECT(MM)
## The function is currently defined as function (MM) { PMM <- MM - (matrix(1, n, 1) %*% apply(MM, 2, sum))/n return(PMM) }
Run the code above in your browser using DataLab