@@ -92,10 +92,10 @@ theme_linedraw <- function(base_size = 12, base_family = "") {
92
92
theme_grey(base_size = base_size , base_family = base_family ) %+ replace %
93
93
theme(
94
94
axis.text = element_text(colour = " black" , size = rel(0.8 )),
95
- axis.ticks = element_line(colour = " black" , size = 0.25 ),
96
- legend.key = element_rect(colour = " black" , size = 0.25 ),
95
+ axis.ticks = element_line(colour = " black" , size = 0.25 ),
96
+ legend.key = element_rect(colour = " black" , size = 0.25 ),
97
97
panel.background = element_rect(fill = " white" , colour = NA ),
98
- panel.border = element_rect(fill = NA , colour = " black" , size = 0.5 ),
98
+ panel.border = element_rect(fill = NA , colour = " black" , size = 0.5 ),
99
99
panel.grid.major = element_line(colour = " black" , size = 0.05 ),
100
100
panel.grid.minor = element_line(colour = " black" , size = 0.01 ),
101
101
strip.background = element_rect(fill = " black" , colour = NA ),
@@ -113,11 +113,11 @@ theme_light <- function(base_size = 12, base_family = "") {
113
113
# Starts with theme_grey and then modify some parts
114
114
theme_grey(base_size = base_size , base_family = base_family ) %+ replace %
115
115
theme(
116
- axis.ticks = element_line(colour = " grey50" , size = 0.25 ),
117
- legend.key = element_rect(fill = " white" , colour = " grey50" , size = 0.25 ),
116
+ axis.ticks = element_line(colour = " grey50" , size = 0.25 ),
117
+ legend.key = element_rect(fill = " white" , colour = " grey50" , size = 0.25 ),
118
118
panel.background = element_rect(fill = " white" , colour = NA ),
119
- panel.border = element_rect(fill = NA , colour = " grey50" , size = 0.5 ),
120
- panel.grid.major = element_line(colour = " grey80" , size = 0.25 ),
119
+ panel.border = element_rect(fill = NA , colour = " grey50" , size = 0.5 ),
120
+ panel.grid.major = element_line(colour = " grey80" , size = 0.25 ),
121
121
panel.grid.minor = element_line(colour = " grey92" , size = 0.125 ),
122
122
strip.background = element_rect(fill = " grey50" , colour = NA ),
123
123
strip.text.x = element_text(colour = " white" ),
0 commit comments