This function provides significant speed gain if the input matrix is big

PrinComp_cpp(X)

Arguments

X

an R matrix (expression matrix), rows are genes, columns are cells

Value

a list with three list pca lists

Examples

mat_test <-matrix(rnbinom(1000000,mu=0.01, size=10),nrow=1000) #library(microbenchmark) #microbenchmark(PrinComp_cpp(mat_test), prcomp(mat_test), times=3)