使いやすいカラーパレットが収録されているパッケージの紹介です。12のカラーパレットが収録されています。「colorRamps」は2007年から更新が続いているパッケージです。ベーシックなカラーパレットは使い勝手がいいと思います。
バージョンは2.3.1。実行コマンドはwindows 11のR version 4.1.3で確認しています。
パッケージのインストール
下記コマンドを実行してください。
#パッケージのインストール install.packages("colorRamps")
実行コマンド
詳細はコメント、パッケージヘルプを確認してください。
#パッケージの読み込み library("colorRamps") ##プロット準備 par(mfrow = c(12, 1), mar = c(0, 10, 1, 0)) n <- 100 ######## #各カラーパレットのコマンド実行 for(i in 1:12){ #blue2red image(1:n, 1, matrix(1:n, n), lwd = 2, col = blue2red(n), axes = FALSE, xlab = "", ylab = "",) mtext("blue2red", line = 1, srt = -45, side = 2, cex.lab = 1, las = 2) #blue2green image(1:n, 1, matrix(1:n, n), col = blue2green(n), axes = FALSE, xlab = "", ylab = "") mtext("blue2green", line = 1, srt = -45, side = 2, cex.lab = 1, las = 2) #green2red image(1:n, 1, matrix(1:n, n), col = green2red(n), axes = FALSE, xlab = "", ylab = "") mtext("green2red", line = 1, srt = -45, side = 2, cex.lab = 1, las = 2) #blue2yellow image(1:n, 1, matrix(1:n, n), col = blue2yellow(n), axes = FALSE, xlab = "", ylab = "") mtext("blue2yellow", line = 1, srt = -45, side = 2, cex.lab = 1, las = 2) #cyan2yellow image(1:n, 1, matrix(1:n, n), col = cyan2yellow(n), axes = FALSE, xlab = "", ylab = "") mtext("cyan2yellow", line = 1, srt = -45, side = 2, cex.lab = 1, las = 2) #magenta2green image(1:n, 1, matrix(1:n, n), col = magenta2green(n), axes = FALSE, xlab = "", ylab = "") mtext("magenta2green", line = 1, srt = -45, side = 2, cex.lab = 1, las = 2) #matlab.like image(1:n, 1, matrix(1:n, n), col = matlab.like(n), axes = FALSE, xlab = "", ylab = "") mtext("matlab.like", line = 1, srt = -45, side = 2, cex.lab = 1, las = 2) #matlab.like2 image(1:n, 1, matrix(1:n, n), col = matlab.like2(n), axes = FALSE, xlab = "", ylab = "") mtext("matlab.like2", line = 1, srt = -45, side = 2, cex.lab = 1, las = 2) #blue2green2red image(1:n, 1, matrix(1:n, n), col = blue2green2red(n), axes = FALSE, xlab = "", ylab = "") mtext("blue2green2red", line = 1, srt = -45, side = 2, cex.lab = 1, las = 2) #ygobb image(1:n, 1, matrix(1:n, n), col = ygobb(n), axes = FALSE, xlab = "", ylab = "") mtext("ygobb", line = 1, srt = -45, side = 2, cex.lab = 1, las = 2) #primary.colors image(1:n, 1, matrix(1:n, n), col = primary.colors(100), axes = FALSE, xlab = "", ylab = "") mtext("primary.colors", line = 1, srt = -45, side = 2, cex.lab = 1, las = 2) #rgb.tables image(1:n, 1, matrix(1:n, n), col = rgb.tables(n = n, red = c(0.75, 0.25, 1), green = c(0.5, 0.25, 1), blue = c(0.25, 0.25, 1)), axes = FALSE, xlab = "", ylab = "") mtext("rgb.tables", line = 1, srt = -45, side = 2, cex.lab = 1, las = 2) }
出力例
少しでも、あなたの解析が楽になりますように!!