## Not run:
# #G is a gating hierarchy
# getNodes(G[[1]])#return node names
# setNode(G,"L","lymph")
# ## End(Not run)
## Not run:
# setNode(gh, 4, FALSE) # hide a node
# setNode(gh, 4, TRUE) # unhide a node
# ## End(Not run)
Run the code above in your browser using DataLab