blob: d62f03c5a4dc8e687de825aa3af876f0e144f148 [file] [log] [blame]
Marc Kupietz52144812020-12-14 23:41:56 +01001idsBaseFontFamily <- 'Fira Sans Condensed'
2
3idsPalette <- 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
26idsPaletteGreyscale <- c(
27 "#000000", "#B2B0AD", "#737373", "#D8D7D6", "#B2B0AD", "#8C8984"
28)
29
30backgroundColorDark <- "#2a2a2a"
31textColorDark <- "#E0E0E3"
32lowContrastColorDark <- "#707073"
33highContrastColorDark <- "#F0F0F3"
34mediumContrastColorDark <- "#808083"
35
36backgroundColor <- "#ffffff"
37textColor <- "#383838"
38highContrastColor <- "#101013"
39lowContrastColor <- "#E0E0E3"
40mediumContrastColor <- "#404043"
41tooltipBackgroundColor <- "#ffffffe0"
42boxplotFillColor <- "#505053"
43candlestickColor <- "black"
44errorbarColor <- "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#'
55ids_pal <- function() {
56 values <- idsPalette
57 f <- scales::manual_pal(values)
58 attr(f, "max_n") <- length(values)
59 f
60}