Returns the normalized matrix.
1 2 3 4 5 6 7 8 9 10 11 12 13 | target <- matrix(rnorm(100*150, mean = 1, sd = 1), nrow = 100, ncol = 150)
test <- matrix(rnorm(30*150, mean = 2, sd = 2), nrow = 30, ncol = 150)
normalized_test <- quantileNormalizeByFeature(test, target)
par(mfrow=c(1,2))
plot(density(target), main = "Pre-normalization", xlim = c(-6,6),
ylim = c(0,.6), lwd=2)
lines(density(test), col = "red", lwd=2)
plot(density(target), main = "Post-normalization", xlim = c(-6,6),
ylim = c(0,1), lwd=2)
lines(density(normalized_test), col = "red", lwd=2)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.