plotで軸タイトルを縦書きにする

  • 3
    いいね
  • 0
    コメント
この記事は最終更新日から1年以上が経過しています。

当方windows環境です。
plotを用いる際に軸タイトルを縦書きにしたいと聞かれたのでとりあえず改行コードを間にはさむ回答をしたのですが、ggplot2やlatticeを用いる以外にもっとエレガントな回答ないでしょうか。

axis_text.R
convertTXT <- function(x){
res <- paste(collapse="\n", unlist(strsplit(split="", x)))
return(res)
}

plot(x=2000:2010, y=25:35, type="p", xlab="平均気温", ylab="")
mtext(convertTXT("全世界の海賊の数"), side=2, las=1, line=3)