[R]作図の色指定で使える色を虹色のグラデーションで得る
rainbow関数を使う。引数に整数を指定するとその数だけ、赤→紫の方向にグラデーションで順番に色を返す。以下は引数に7を指定した例。戻り値は7色になる。
> par_mai_old <- par("mai")
> par(mai = c(0.1, 1.5, 0.1, 0.1))
> n <- 7
> s <- rainbow(n)
> print(s)
[1] "#FF0000" "#FFDB00" "#49FF00" "#00FF92" "#0092FF" "#4900FF" "#FF00DB"
> barplot(rep(1, n), names = s, col = s, horiz = TRUE, las = 1, xaxt = "n")
> par(mai = par_mai_old)
以下は14を指定した例。赤から始まり紫までグラデーションで色が戻る。
> par_mai_old <- par("mai")
> par(mai = c(0.1, 1.5, 0.1, 0.1))
> n <- 14
> s <- rainbow(n)
> print(s)
[1] "#FF0000" "#FF6D00" "#FFDB00" "#B6FF00" "#49FF00" "#00FF24" "#00FF92"
[8] "#00FFFF" "#0092FF" "#0024FF" "#4900FF" "#B600FF" "#FF00DB" "#FF006D"
> barplot(rep(1, n), names = s, col = s, horiz = TRUE, las = 1, xaxt = "n")
> par(mai = par_mai_old)