Description Usage Arguments Value Examples
Plotting for Frigyesi rank selection method
1 | rss.rankplot(orig, random)
|
orig |
result of a rank selection run on original data |
random |
result of a rank selection run on randomised data |
a ggplot object
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | ## Not run:
mkD <- function(NOISE=TRUE) {
n <- 1000 # features
counts <- c(30, 10, 20, 10, 15, 15) # samples
syntheticNMF(n=n, r=counts, offset = NULL, noise = NOISE,
factors = FALSE, seed = 99)
}
k<-mkD()
V.random <- randomize(k)
aheatmap(V.random)
estim.r2 <- nmf(k, 2:20, nrun=30)
estim.r2.random <- nmf(V.random, 2:20, nrun=30)
rss.rankplot(estim.r2, estim.r2.random)
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.