Rで解析：ランダムにカラーパレットを作成「as.color」パッケージ

配列からランダムにカラーパレットを作成するパッケージの紹介です。色の使い方に迷った時に使用してはいかがでしょうか。面白いパッケージだと思います

パッケージバージョンは0.1。実行コマンドはwindows 7およびOS X 10.11.2のR version 3.3.0で確認しています。

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

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

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

実行コマンド

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

#&#12497;&#12483;&#12465;&#12540;&#12472;&#12398;&#35501;&#12415;&#36796;&#12415;
library("as.color")
#scales&#12497;&#12483;&#12465;&#12540;&#12472;&#12364;&#12394;&#12369;&#12428;&#12400;&#12452;&#12531;&#12473;&#12488;&#12540;&#12523;
if(!require("scales", quietly = TRUE)){
  install.packages("scales");require("scales")
}

###&#12487;&#12540;&#12479;&#20363;&#12398;&#20316;&#25104;#####
n <- 100
TestData <- data.frame(Group <- I(sample(letters[1:10], n,
                                         replace = TRUE)),
                       Data <- rnorm(n))
########

#&#12487;&#12540;&#12479;&#12363;&#12425;&#12459;&#12521;&#12540;&#12497;&#12524;&#12483;&#12488;&#12434;&#20316;&#25104;:as.color&#12467;&#12510;&#12531;&#12489;
#&#12487;&#12540;&#12479;&#12434;&#25351;&#23450;:x&#12458;&#12503;&#12471;&#12519;&#12531;
#&#36879;&#26126;&#24230;&#12434;&#25351;&#23450;:alpha&#12458;&#12503;&#12471;&#12519;&#12531;;0&#12363;&#12425;1&#12398;&#31684;&#22258;
ColData <- as.color(x = TestData[, 1], alpha = 1)
#&#12459;&#12521;&#12540;&#12497;&#12524;&#12483;&#12488;&#12398;&#34920;&#31034;
show_col(ColData, labels = FALSE)

#&#31665;&#12402;&#12370;&#22259;&#12434;&#12503;&#12525;&#12483;&#12488;
plot(x = factor(TestData[, 1]),
     y = TestData[, 2], col = ColData, pch = 19)

出力例

#カラーパレットの表示

#箱ひげ図をプロット

少しでも、あなたの解析が楽になりますように！！