r - ggtree図から「a」を削除します

Question

グループごとに色分けされたヒント ラベルを持つツリーがあるとします。

 library(ggplot2)
 library(ggtree)
 nwk <- system.file("extdata", "sample.nwk", package="treeio")
 tree <- read.tree(nwk)
 meta = data.frame(label = c("A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M"),
              group = c(rep("mammal", 5), rep("insect", 5), rep("bird", 3)))

 p = ggtree(tree) %<+% meta +
     geom_tiplab(aes(color = group))

凡例aには、目的の正方形の代わりに含まれます。ggplot2ドキュメントには、「override.aes」を使用してこの動作をオーバーライドすることが記載されています。

p + guides(color = guide_legend(override.aes = list(size = 4,
                                             label = "",
                                             shape = 15)))

これは動作しません。サイズや色を変更したり、削除したりできますaが、最も重要なのは、別の形状 (この場合は正方形) を使用できないことです。

新しいバージョンの ggplot2 にはkey_glyphオプションがありますが、これも を使用する場合は効果がありませんgeom_tiplab。

もう 1 つの奇妙な動作は、 を使用するgeom_tipppointと、凡例のオーバーライドが機能することです。注目すべきは、上記の戦略は以前は を削除するために機能していましたaが、最新の R/ggplot2/ggtree では上記の戦略は機能しません。ggtreeこれは、古いバージョンではなく、最新バージョンに関連しています。

geom_tiplab()凡例の形状をオーバーライドする方法に関するアドバイスはありますか?

私の環境：

R version 4.1.2 (2021-11-01)
ggplot2 version 3.3.5
ggtree version 3.2.1
Platform: x86_64-pc-linux-gnu (64-bit)
Running under: Linux Mint 20