R/zscore.wrap.R

In paubellot/netbenchmark: Benchmarking of several gene network inference methods

Defines functions zscore.wrap

Documented in zscore.wrap

zscore.wrap <- function(data){
    Z <- zsc(as.matrix(data))
    Z <- abs(Z)
    colnames(Z) <- colnames(data)
    rownames(Z) <- colnames(data)
    Z <- pmax(Z,t(Z))
    Z
}