idCombin: Identify the combination of key regulators.
In xzheng-ac/scPADGRN: A PADMM approach for reconstructing DGRN using scRNA-seq

Description Usage Arguments Value Examples

This function identifies the combination of key regulators.

1	idCombin(net, flag, tf)

`net`	Dynamic gene regulatroy network, computed by scPADGRN, a list of numerical matrix.
`flag`	Indicator of functional genes, a zero-one vector of length m, where m is gene number.
`tf`	A vector of gene names.

'sd' is the standard derivation of each combination, and it ranks from low to high.

##---- 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 (net, flag, tf)
{
    keyNodes <- idNodes(net, flag, tf)[1:5, ]
    keyNames <- rownames(keyNodes)
    keyFlag <- rep(0, length(keyNames))
    sd <- rep(0, length(keyNames))
    for (i in c(1:length(keyNames))) {
        keyFlag[i] <- tf[keyNames[i], 2]
    }
    for (j in c(1:length(keyNames))) {
        fflag <- flag
        fflag[keyFlag[1:j]] <- 0
        sd[j] <- sd(DGIE(net, fflag, tf))
    }
    sd <- as.matrix(sd)
    rownames(sd) <- keyNames
    return(sd)
  }