Rで解析：白黒印刷でも視認性を確保。「viridis」パッケージの紹介

ディスプレイでは問題無い図の色使いも、白黒印刷では視認性が悪い場合があります。そんな問題を解決するために開発された「viridis」パッケージです。パッケージを利用した「カラー出力」とフォトショップで「カラー出力をグレースケールに変換」した例を紹介します。

バージョンは0.1。R version 3.2.1でコマンドをWindows７ならびにMacOS10.10.4で確認しています。

パッケージのインストール

下記コマンドを実行してください。

#パッケージのインストール
install.packages("viridis")

実行コマンドの紹介

詳細はコメント、パッケージヘルプを確認してください。

#&#12521;&#12452;&#12502;&#12521;&#12522;&#12398;&#35501;&#12415;&#36796;&#12415;
library("viridis")

#####&#28310;&#20633;#####################
#&#12487;&#12540;&#12479;&#20363;&#12398;&#20316;&#25104;
TestData <- data.frame(Group = paste0("Group", 1:100),
                       Data1 = sample(0:1, 100, replace = TRUE))
##############################

#&#12479;&#12464;&#12463;&#12521;&#12454;&#12489;&#12391;&#12503;&#12525;&#12483;&#12488;
#&#12452;&#12531;&#12473;&#12488;&#12540;&#12523;&#12467;&#12510;&#12531;&#12489;
#install.packages("tagcloud")
library("tagcloud")
tagcloud(TestData[, 1], weights = TestData[, 2],
         col = viridis(100), order = "size", algorithm = "oval")