# NOT RUN {
library(treeman)
tree <- randTree(10)
vals <- runif(min=0, max=1, n=tree['nall'])
tree <- setNdsOther(tree, tree['all'], vals, 'confidence')
tree <- updateSlts(tree)
summary(tree)
tree <- rmOtherSlt(tree, 'confidence')
tree <- updateSlts(tree)
summary(tree)
# }
Run the code above in your browser using DataLab