如何增加ggtree中的最大分支宽度？

Question

我在系统谱的分支中添加了一些特征，并将分支宽度缩放到它们的值：

library(ggtree)
library(tidyverse)

tree <- rtree(3, rooted = T)
trait <- data.frame(node = 1:(length(tree$edge.length)+1),
                    thing = rnorm(n = length(tree$edge.length)+1, mean = 4))

t <- full_join(tree, trait)
ggtree(t, aes(size = thing))

特别是如果特征值范围很大，分支宽度需要能够反映这一点。如何指定分支的最大宽度？

Answer 1

在映射size 美学时直接调用trait$thing 向量。最好确保trait 由tree$tip.label 排序，尽管ggtree 可能在内部进行一些匹配。

library(ggtree)

tree <- rtree(3, rooted = T)
trait <- data.frame(node = 1:(length(tree$edge.length)+1),
                    thing = rnorm(n = length(tree$edge.length)+1, mean = 4))

ggtree(tr = tree, aes(size = trait$thing)) + 
  scale_size_continuous(range = c(0.2, 2))

来自?scale_size_continuous：

范围

一个长度为 2 的数值向量，指定变换后绘图符号的最小和最大尺寸。