使用下面的代碼和示例資料，我繪制了一個 gt 表：
df <- structure(list(date = c("2016-1-31", "2016-2-29", "2016-3-31",
"2016-4-30", "2016-5-31", "2016-6-30", "2016-7-31", "2016-8-31",
"2016-9-30"), value1 = c(-15.25, -27.96, 7.53, -5.24, -6.93,
-6.83, -6.47, 13, -10.48), value2 = c(-19.93, -13.76, 20, -11.12,
-0.59, -9.06, 15, 1.66, -1.59)), class = "data.frame", row.names = c(NA,
-9L))
library(gt)
library(tidyverse)
df %>%
gt() %>%
data_color(
columns = value1:value2,
colors = scales::col_numeric(
palette = c(
'red', 'yellow', 'green'),
domain = c(df$value1, df$value2))
)
下一步我嘗試實作與下圖大致相同的顏色效果，我通過簡單地從 Excel 中的格式樣式下拉串列中選擇默認的 3 色標度：紅色、黃色、綠色來完成。
有人知道以下十六進制顏色代碼或其他 R 調色板的值可以達到相同的效果嗎？謝謝。
更新：我獲得了類似的顏色代碼："#f8696b", "#ffeb84", "#63be7b"
df %>%
gt() %>%
data_color(
columns = value1:value2,
colors = scales::col_numeric(
palette = c(
"#f8696b", "#ffeb84", "#63be7b"),
domain = c(df$value1, df$value2))
)
參考：
轉載請註明出處，本文鏈接：https://www.uj5u.com/qianduan/427682.html