仿真ggplot2默認調色板

Question

我可以使用什麼函數來模擬ggplot2的默認調色板以獲得所需數量的顏色。例如，爲3的輸入將產生的HEX顏色的字符向量與這些顏色：

Answer 1

它僅僅是等距隔開的色調在色輪上，從15開始：

gg_color_hue <- function(n) { 
    hues = seq(15, 375, length = n + 1) 
    hcl(h = hues, l = 65, c = 100)[1:n] 
} 

例如：

n = 4 
cols = gg_color_hue(n) 

dev.new(width = 4, height = 4) 
plot(1:n, pch = 16, cex = 2, col = cols) 

Answer 2

從哈德利韋翰的GGPLOT2書的106頁：

默認配色方案scale_colour_hue在hcl色輪周圍採用均勻分佈的色調 。

有了一點逆向工程，你可以構建這樣的功能：

ggplotColours <- function(n = 6, h = c(0, 360) + 15){ 
    if ((diff(h) %% 360) < 1) h[2] <- h[2] - 360/n 
    hcl(h = (seq(h[1], h[2], length = n)), c = 100, l = 65) 
} 

在barplot演示這一點：

y <- 1:3 
barplot(y, col = ggplotColours(n = 3)) 

Answer 3

這些答案都很好，但我想分享另一件我在stackoverflow上發現的東西，這真的很有用，這裏是t他direct link

基本上，@DidzisElferts展示瞭如何獲取ggplot用於構建您創建的繪圖的所有顏色，座標等。非常好！

p <- ggplot(mpg,aes(x=class,fill=class)) + geom_bar() 
ggplot_build(p)$data 
[[1]] 
    fill y count x ndensity ncount density PANEL group ymin ymax xmin xmax 
1 #F8766D 5  5 1  1  1 1.111111  1  1 0 5 0.55 1.45 
2 #C49A00 47 47 2  1  1 1.111111  1  2 0 47 1.55 2.45 
3 #53B400 41 41 3  1  1 1.111111  1  3 0 41 2.55 3.45 
4 #00C094 11 11 4  1  1 1.111111  1  4 0 11 3.55 4.45 
5 #00B6EB 33 33 5  1  1 1.111111  1  5 0 33 4.55 5.45 
6 #A58AFF 35 35 6  1  1 1.111111  1  6 0 35 5.55 6.45 
7 #FB61D7 62 62 7  1  1 1.111111  1  7 0 62 6.55 7.45 

Answer 4

這是

library(scales) 
show_col(hue_pal()(4)) 

show_col(hue_pal()(3)) 

結果