git-svn-id: https://hedgehog.fhcrc.org/bioconductor/trunk/madman/Rpacks/ggtree@121788 bc3139a8-67e5-0310-9ffc-ced21a209358
g.yu authored on 05/10/2016 08:52:08
| ... | ... |
@@ -1,5 +1,6 @@ |
| 1 | 1 |
CHANGES IN VERSION 1.5.14 |
| 2 | 2 |
------------------------ |
| 3 |
+ o subset tip in geom_tiplab2 <2016-10-05, Wed> |
|
| 3 | 4 |
o add `compute_group` according to ggplot (v2.1.0) <2016-09-29, Thu> |
| 4 | 5 |
+ https://github.com/hadley/ggplot2/issues/1797 |
| 5 | 6 |
o unit test for groupOTU and groupClade <2016-09-22, Thu> |
| ... | ... |
@@ -22,6 +22,7 @@ geom_tippoint <- function(mapping = NULL, data = NULL, |
| 22 | 22 |
|
| 23 | 23 |
geom_tippoint2 <- function(mapping=NULL, hjust=0, ...) {
|
| 24 | 24 |
angle <- NULL |
| 25 |
+ isTip <- NULL |
|
| 25 | 26 |
m1 <- aes(subset=(isTip & (angle < 90 | angle > 270)), angle=angle) |
| 26 | 27 |
m2 <- aes(subset=(isTip & (angle >= 90 & angle <=270)), angle=angle+180) |
| 27 | 28 |
|