25 lines
958 B
R
25 lines
958 B
R
|
ESSred <- rgb(.91, .20, .32)
|
||
|
|
ESSgreen <- rgb(.14, .62, .51)
|
||
|
|
ESSblue <- rgb(0, .25, .48)
|
||
|
|
|
||
|
|
# now some adjacent and square colors (colortools has been removed from CRAN)
|
||
|
|
ESS_colors_extra <- c(rgb(.44,.2,.91),rgb(.2,.91,.79),rgb(.68,.91,.2),rgb(.91,.2,.68),rgb(.91,.44,.2))
|
||
|
|
|
||
|
|
ESSColors <- c(ESSred, ESS_colors_extra, ESSgreen, ESSblue)
|
||
|
|
|
||
|
|
themeESS <- theme_tufte(base_size = 9, base_family = "Calibri") +
|
||
|
|
theme(axis.title = element_text(size = 9, face = "plain"),
|
||
|
|
axis.text = element_text(size = 9),
|
||
|
|
axis.line.x = element_line(),
|
||
|
|
plot.title = element_blank(),
|
||
|
|
legend.title = element_blank(),
|
||
|
|
legend.text = element_text(size = 9),
|
||
|
|
strip.text = element_text(size = 9, face = "bold"),
|
||
|
|
legend.position = "none",
|
||
|
|
legend.direction = "horizontal",
|
||
|
|
legend.box = "vertical",
|
||
|
|
legend.spacing = unit(0, "line"),
|
||
|
|
legend.key.size = unit(.75, "line"))
|
||
|
|
linebreak <- "\\hspace{\\textwidth}"
|
||
|
|
|