#data( toydata ) # Load toy data set
#D <- toydata$emat # Response matrix (for example, gene expression)
#netw <- toydata$netw # Network
# Detect network responses
#model <- detect.responses(D, netw, verbose = FALSE)
# Assign samples to responses (soft, probabilistic assignments sum to 1)
#response.probabilities <- sample2response(model, subnet.id = "Subnet-1")
Run the code above in your browser using DataLab