@@ -89,6 +89,7 @@ GeomSegmentGGtree <- ggproto("GeomSegmentGGtree", GeomSegment,

                                                    lineend = "butt", na.rm = FALSE, nudge_x = 0) {

                                  data$x <- data$x + nudge_x

+                                 ## data$x <- data$x - sapply(data$label, function(x) convertWidth(grobWidth(textGrob(x, gp=gpar(fontsize=.04* .pt))), "native", TRUE))

                                  GeomSegment$draw_panel(data, panel_scales, coord, arrow,

                                                         lineend, na.rm)

                              }

@@ -47,6 +47,7 @@ geom_tiplab <- function(mapping=NULL, hjust = 0,  align = FALSE, linetype = "dot

                                xend = x + diff(range(x, na.rm=TRUE))/200,

                                y = y, yend = y,

                                node = node,

+                               label = label,

                                subset = isTip)

         if (!is.null(mapping))

             segment_mapping <- modifyList(segment_mapping, mapping)

@@ -7,14 +7,14 @@ ggtree: an R package for visualization and annotation of phylogenetic trees with

 [![releaseVersion](https://img.shields.io/badge/release%20version-1.10.0-green.svg?style=flat)](https://bioconductor.org/packages/ggtree)

 [![develVersion](https://img.shields.io/badge/devel%20version-1.11.1-green.svg?style=flat)](https://github.com/guangchuangyu/ggtree)

 [![Bioc](http://www.bioconductor.org/shields/years-in-bioc/ggtree.svg)](https://www.bioconductor.org/packages/devel/bioc/html/ggtree.html#since)

-[![total](https://img.shields.io/badge/downloads-21387/total-blue.svg?style=flat)](https://bioconductor.org/packages/stats/bioc/ggtree)

+[![total](https://img.shields.io/badge/downloads-21527/total-blue.svg?style=flat)](https://bioconductor.org/packages/stats/bioc/ggtree)

 [![month](https://img.shields.io/badge/downloads-1156/month-blue.svg?style=flat)](https://bioconductor.org/packages/stats/bioc/ggtree)

 [![Project Status: Active - The project has reached a stable, usable

 state and is being actively

 developed.](http://www.repostatus.org/badges/latest/active.svg)](http://www.repostatus.org/#active)

 [![codecov](https://codecov.io/gh/GuangchuangYu/ggtree/branch/master/graph/badge.svg)](https://codecov.io/gh/GuangchuangYu/ggtree)

-[![Last-changedate](https://img.shields.io/badge/last%20change-2017--11--20-green.svg)](https://github.com/GuangchuangYu/ggtree/commits/master)

+[![Last-changedate](https://img.shields.io/badge/last%20change-2017--11--24-green.svg)](https://github.com/GuangchuangYu/ggtree/commits/master)

 [![GitHub

 forks](https://img.shields.io/github/forks/GuangchuangYu/ggtree.svg)](https://github.com/GuangchuangYu/ggtree/network)

 [![GitHub

@@ -59,8 +59,8 @@ their covariates and other associated data. ***Methods in Ecology and

 Evolution***. 2017, 8(1):28-36.

 [![doi](https://img.shields.io/badge/doi-10.1111/2041--210X.12628-green.svg?style=flat)](http://dx.doi.org/10.1111/2041-210X.12628)

-[![Altmetric](https://img.shields.io/badge/Altmetric-336-green.svg?style=flat)](https://www.altmetric.com/details/10533079)

-[![citation](https://img.shields.io/badge/cited%20by-46-green.svg?style=flat)](https://scholar.google.com.hk/scholar?oi=bibs&hl=en&cites=7268358477862164627)

+[![Altmetric](https://img.shields.io/badge/Altmetric-335-green.svg?style=flat)](https://www.altmetric.com/details/10533079)

+[![citation](https://img.shields.io/badge/cited%20by-49-green.svg?style=flat)](https://scholar.google.com.hk/scholar?oi=bibs&hl=en&cites=7268358477862164627)

 ------------------------------------------------------------------------

@@ -71,7 +71,7 @@ Evolution***. 2017, 8(1):28-36.

 ### Download stats

 [![download](http://www.bioconductor.org/shields/downloads/ggtree.svg)](https://bioconductor.org/packages/stats/bioc/ggtree)

-[![total](https://img.shields.io/badge/downloads-21387/total-blue.svg?style=flat)](https://bioconductor.org/packages/stats/bioc/ggtree)

+[![total](https://img.shields.io/badge/downloads-21527/total-blue.svg?style=flat)](https://bioconductor.org/packages/stats/bioc/ggtree)

 [![month](https://img.shields.io/badge/downloads-1156/month-blue.svg?style=flat)](https://bioconductor.org/packages/stats/bioc/ggtree)

 <img src="docs/images/dlstats.png" width="890"/>

Binary files a/docs/images/citation.png and b/docs/images/citation.png differ