Marc Kupietz | 5214481 | 2020-12-14 23:41:56 +0100 | [diff] [blame^] | 1 | idsBaseFontFamily <- 'Fira Sans Condensed' |
| 2 | |
| 3 | idsPalette <- c( |
| 4 | '#EB7C31', |
| 5 | "#1F77B4", |
| 6 | "#2CA02C", |
| 7 | "#D62728", |
| 8 | "#9467BD", |
| 9 | "#8C564B", |
| 10 | "#E377C2", |
| 11 | "#7F7F7F", |
| 12 | "#BCBD22", |
| 13 | "#17BECF", |
| 14 | "#AEC7E8", |
| 15 | "#FFBB78", |
| 16 | "#98DF8A", |
| 17 | "#FF9896", |
| 18 | "#C5B0D5", |
| 19 | "#C49C94", |
| 20 | "#F7B6D2", |
| 21 | "#C7C7C7", |
| 22 | "#DBDB8D", |
| 23 | "#9EDAE5" |
| 24 | ) |
| 25 | |
| 26 | idsPaletteGreyscale <- c( |
| 27 | "#000000", "#B2B0AD", "#737373", "#D8D7D6", "#B2B0AD", "#8C8984" |
| 28 | ) |
| 29 | |
| 30 | backgroundColorDark <- "#2a2a2a" |
| 31 | textColorDark <- "#E0E0E3" |
| 32 | lowContrastColorDark <- "#707073" |
| 33 | highContrastColorDark <- "#F0F0F3" |
| 34 | mediumContrastColorDark <- "#808083" |
| 35 | |
| 36 | backgroundColor <- "#ffffff" |
| 37 | textColor <- "#383838" |
| 38 | highContrastColor <- "#101013" |
| 39 | lowContrastColor <- "#E0E0E3" |
| 40 | mediumContrastColor <- "#404043" |
| 41 | tooltipBackgroundColor <- "#ffffffe0" |
| 42 | boxplotFillColor <- "#505053" |
| 43 | candlestickColor <- "black" |
| 44 | errorbarColor <- "black" |
| 45 | |
| 46 | #' IDS color palette based on the d3 color palette |
| 47 | #' |
| 48 | #' @importFrom scales manual_pal |
| 49 | #' @export |
| 50 | #' |
| 51 | #' @references |
| 52 | #' |
| 53 | #' \url{https://github.com/d3/d3} |
| 54 | #' |
| 55 | ids_pal <- function() { |
| 56 | values <- idsPalette |
| 57 | f <- scales::manual_pal(values) |
| 58 | attr(f, "max_n") <- length(values) |
| 59 | f |
| 60 | } |