library('TreeTools', quietly = TRUE) # for as.phylo
# jackTrees will usually be generated with Jackknife(), but for simplicity:
jackTrees <- as.phylo(1:100, 8)
tree <- as.phylo(0, 8)
JackLabels(tree, jackTrees)
tree$node.label <- JackLabels(tree, jackTrees, plot = FALSE)
Run the code above in your browser using DataLab