mixDGIE: Mixed DGIE score for dynamic gene regulatory network
In xzheng-ac/scPADGRN: A PADMM approach for reconstructing DGRN using scRNA-seq

Description Usage Arguments Value Examples

This function returns mixed DGIE score for dynamic gene regulatory network

1	mixDGIE(mixnet, flag, tf)

`mixnet`	mixnet is dynamic gene regulatory network.
`flag`	Indicator of functional genes, a zero-one vector of length m, where m is gene number.
`tf`	A vector of gene names.

index

A numberical matrix, stands for DGIE score for DGRN

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (mixnet, flag, tf)
{
    pnet <- mixnet
    nnet <- mixnet
    for (i in c(1:length(mixnet))) {
        pnet[[i]][pnet[[i]] < 0] <- 0
        nnet[[i]][nnet[[i]] > 0] <- 0
    }
    index <- matrix(0, 3, length(mixnet))
    index[1, ] <- DGIE(mixnet, flag, tf)
    index[2, ] <- DGIE(pnet, flag, tf)
    index[3, ] <- DGIE(nnet, flag, tf)
    return(index)
  }