# NOT RUN {
head(workaholic)
# }
# NOT RUN {
## Example networktree with OCI-R scale
data(workaholic)
nodeVars <- paste("OCIR",1:18,sep="")
splitVars <- c("Workaholism_diagnosis","Gender")
myTree<-networktree(workaholic[,nodeVars], workaholic[,splitVars])
myTree
plot(myTree)
# }
# NOT RUN {
# }
Run the code above in your browser using DataCamp Workspace