2024年10月28日月曜日

geom_strip( )でイタリック

午前
・データ解析
・Rゼミ

午後
・野外調査
・データ整理

系統樹の描画には、library(ggtree)を使っている。

Cladeを示すOTUのannotationは、geom_strip( )で行っているが、学名をイタリックにすることに苦戦したのでメモ。

geom_text( )をベースとしている(?)ようなので、同じ方法でやれば良いみたい。

微妙なコマンドミスがあったようでエラーが出まくって諦めかけたけど、どうにか正解に辿りつけた。

本来はこんな感じで書く(必要な部分のみ)。
  geom_strip(label = "B. ocellatus") +
  geom_strip(label = "B. cf. purpura"))
すると学名が立体になる。
イタリックにするにはitalic( )を使うが、paste( )とparse=Tを合わせて使用する。また、テキスト部分はc(' ')で括る必要がある。

途中に立字を入れる場合、面倒だけど「italic( ), 立字, italic ( )」とする。
  geom_strip(label = c('paste(italic("B. ocellatus"))'), parse=T) +
  geom_strip(label = c('paste(italic("B. "), "cf. ", italic("purpura"))'), parse=T)
参考にしたサイト
How to make R and p italic in geom_text()
13 Gallery of Reproducible Examples