Hi, This worked: fit <- hclust(d, method="ward") library(ape) p <- (as.phylo(fit)) write.tree(p, file="MyNewick.tre") Cheers, J -- View this message in context: http://r.789695.n4.nabble.com/Hclust-tree-to-Figtree-w-branch-lengths-tp4655990p4656057.html Sent from the R help mailing list archive at Nabble.com.