Rと解析：知らない色に出会えるかも「colormod」パッケージ

色に関するパッケージをいくつか紹介してきました。本パッケージの特徴は、二つの指定した色を混合し新たな色を作成するコマンドだと思います。

その他にも、設定した色に白を混ぜ合わせたり、明るさ、彩度を調整するコマンドも収録されています。「scales」パッケージと合わせて使用してはいかがでしょうか。

パッケージバージョンは0.1.0。windows11のR version 4.2.2で確認しています。

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

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

#パッケージのインストール
install.packages("devtools")
devtools::install_github("briandconnelly/colormod")

実行コマンド

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

#&#12497;&#12483;&#12465;&#12540;&#12472;&#12398;&#35501;&#12415;&#36796;&#12415;
library("colormod")
#&#12497;&#12483;&#12465;&#12540;&#12472;&#12398;&#35501;&#12415;&#36796;&#12415;
library("colormod")
#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")
}

#&#25351;&#23450;&#12375;&#12383;&#33394;&#12434;&#22522;&#28310;&#12392;&#12375;&#12383;&#26126;&#12427;&#12373;&#12398;&#35519;&#25972;:darken&#12467;&#12510;&#12531;&#12489;
#&#35519;&#25972;:amount&#12458;&#12503;&#12471;&#12519;&#12531;;-1&#12363;&#12425;1
#amount&#12458;&#12503;&#12471;&#12519;&#12531;&#12398;&#20516;&#12364;&#36870;&#12398;darken&#12467;&#12510;&#12531;&#12489;&#12364;&#12354;&#12426;&#12414;&#12377;
par(mfrow = c(3, 5))
#&#26126;&#12427;&#12373;&#12398;&#35519;&#25972;,-1&#12363;&#12425;1&#12434;0.2&#21051;&#12415;&#12391;&#25351;&#23450;
LightVec <- seq(-1, 1, 0.2)
for(n in seq(length(LightVec))){
  
  show_col(darken("#4b61ba", amount = LightVec[n]))
  
}

#&#25351;&#23450;&#12375;&#12383;&#33394;&#12434;&#22522;&#28310;&#12392;&#12375;&#12383;&#24425;&#24230;&#12398;&#35519;&#25972;:saturate&#12467;&#12510;&#12531;&#12489;
#&#35519;&#25972;:amount&#12458;&#12503;&#12471;&#12519;&#12531;;-1&#12363;&#12425;1
#amount&#12458;&#12503;&#12471;&#12519;&#12531;&#12398;&#20516;&#12364;&#36870;&#12398;desaturate&#12467;&#12510;&#12531;&#12489;&#12364;&#12354;&#12426;&#12414;&#12377;
par(mfrow = c(3, 5))
#&#26126;&#12427;&#12373;&#12398;&#35519;&#25972;,-1&#12363;&#12425;1&#12434;0.2&#21051;&#12415;&#12391;&#25351;&#23450;
LightVec <- seq(-1, 1, 0.2)
for(n in seq(length(LightVec))){
  
  show_col(saturate("#4b61ba", amount = LightVec[n]))
  
}

#&#25351;&#23450;&#12375;&#12383;&#33394;&#12434;&#22522;&#28310;&#12392;&#12375;&#12383;&#21453;&#36578;:invert&#12467;&#12510;&#12531;&#12489;
#&#35519;&#25972;:amount&#12458;&#12503;&#12471;&#12519;&#12531;;0&#12363;&#12425;1
#amount&#12458;&#12503;&#12471;&#12519;&#12531;&#12398;&#20516;&#12364;&#36870;&#12398;desaturate&#12467;&#12510;&#12531;&#12489;&#12364;&#12354;&#12426;&#12414;&#12377;
par(mfrow = c(2, 5))
#&#33394;&#12398;&#25351;&#23450;
ColVec <- c("#d9bb9c", "#685432", "#4b61ba", "#8a5136", "#6e5f72")
#&#19978;&#27573;&#12364;&#12458;&#12522;&#12472;&#12490;&#12523;,&#19979;&#27573;&#12364;&#21453;&#36578;
for(n in seq(ColVec)){
  
  show_col(ColVec[n])
  
}
for(n in seq(ColVec)){

出力例

・darkenコマンド

・saturateコマンド

・invertコマンド

・mixコマンド

・tintコマンド

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