powered by
run_pca(x = NULL, retx = TRUE, center = TRUE, scale = TRUE)
load(system.file("extdata", "demo", "demodata.Rda", package="debrowser")) pca_data<-run_pca(getNormalizedMatrix( demodata[rowSums(demodata[,2:7])>10,2:7]))
Run the code above in your browser using DataLab