Я пытаюсь построить три переменные и хочу, чтобы единицы измерения были указаны в осях, но не могу найти способ правильно их пометить в фасетах с верхним индексом.
Я пробовал as_labeller
, label_bquote
, expression
/ paste
и изменение исходных данных.
p <- ggplot(data = LST, aes(x = Date, y = Measurements)) +
geom_point((aes(color = parameter)))
p + facet_grid(parameter ~ ., scales = "free_y",
switch="y",labeller=as_labeller(DO~(mg~L^{-1}), Temperature~(°C), Light~
(µmol~m^{-2}~s^{-1}))) +
theme_bw()+ theme(strip.background = element_blank(),
legend.title = element_blank(), strip.placement = "outside",
panel.grid.minor = element_blank()) +
scale_x_datetime()+ ylab(NULL) +ggtitle("Spring 2018") +
scale_colour_manual(values=c('royalblue1', 'springgreen4', 'darkblue')) +
theme(legend.position="none")+
theme(strip.text=element_text(size=10))
Все, что я пробую, либо помечает все грани одинаково, либо не помещает верхние индексы.Я довольно новичок в ggplot2
, поэтому не уверен, что то, что я пытаюсь, поможет.