I followed this instruction to create a "Fan" phylogenetic trees in R. But I can not get the correct labels.
The command I am trying is:
plot(
    as.phylo(hc), 
    type = "fan", 
    tip.color = hsv(runif(15, 0.65, 0.95), 1, 1, 0.7), 
    edge.color = hsv(runif(10, 0.65, 0.75), 1, 1, 0.7), 
    edge.width = runif(20, 0.5, 3), 
    use.edge.length = TRUE, 
    col = "gray80")
My goal is:
But my current result is:

