if (FALSE) {
# Convert a truth table representation into a
# symbolic representation and back
data(cellcycle)
symbolicNet <- truthTableToSymbolic(cellcycle)
print(symbolicNet)
ttNet <- symbolicToTruthTable(symbolicNet)
print(cellcycle)
}
Run the code above in your browser using DataLab