## Not run:
# dend <- USArrests[1:10,] %>% dist %>% hclust %>% as.dendrogram
#
# par(mfrow =c(1,2), mar = rep(6,4))
# plot_horiz.dendrogram(dend, side=FALSE)
# plot_horiz.dendrogram(dend, side=TRUE)
# # plot_horiz.dendrogram(dend, side=TRUE, dLeaf= 0)
# # plot_horiz.dendrogram(dend, side=TRUE, nodePar = list(pos = 1))
# # sadly, lab.pos is not implemented yet,
# ## so the labels can not be right aligned...
#
#
# plot_horiz.dendrogram(dend, side=F)
# plot_horiz.dendrogram(dend, side=TRUE, dLeaf=0, xlim = c(100,-10)) # bad
# plot_horiz.dendrogram(dend, side=TRUE, text_offset = 0)
# plot_horiz.dendrogram(dend, side=TRUE, text_offset = 0,text_pos=4)
#
# ## End(Not run)
Run the code above in your browser using DataLab