suppressMessages(source(here::here("R/load.R")))
source(here::here("R/get_colorPal.R"))
source(here::here("R/get_img_color.R"))
目前回答了这个 知乎问题。 从抖音的一个短视频了解到这个颜色。 参考维基百科
"#008C8C"
library(ggplot2)
plot_color <- function(color_code = "#008C8C"){
color_filled <- element_rect(fill = color_code)
ggplot() +
theme(
plot.background = color_filled,
panel.background = color_filled
)
}
plot_color("#008C8C")
但是为了求证,我找了下相关原图进行验证,发现并不是,因此实践中,用这个颜色可能需要注意下。
参考维基百科中两篇介绍的报道中的图片。
img1_path <- "refs/marrs-green-thecourier.png"
img2_path <- "refs/marrs-green-tribuneindia.png"
load.image(img1_path) %>% plot
load.image(img2_path) %>% plot
get_img_color(img1_path)
get_img_color(img2_path)