About
git-svn-id: file:///home/git/hedgehog.fhcrc.org/bioconductor/trunk/madman/Rpacks/crlmm@58615 bc3139a8-67e5-0310-9ffc-ced21a209358
@@ -425,7 +425,7 @@ rowCovs <- function(x, y, ...){
}
rowMAD <- function(x, y, ...){
- notna <- !is.na(x)
+ ##notna <- !is.na(x)
mad <- 1.4826*rowMedians(abs(x-rowMedians(x, ...)), ...)
return(mad)