Deutsches R-Forum

Hallo liebes Forum,
ich brauche eine y-Achsen Beschriftung mit hoch und tiefgestellten Elementen und diese sollte gleich wie der andere Text im Plot auch Fett und wenn möglich auch alles in Arial dargestellt werden.
Hier mein Versuch:


library(ggplot2)

toothgrowth <- ToothGrowth
toothgrowth$dose<- as.factor(toothgrowth$dose)

ggplot(toothgrowth, aes(x=dose, y=len)) +
geom_boxplot(alpha=.5, outlier.color = NA) +
geom_jitter(aes(x=dose, y=len,color=dose),width = .15) +
xlab("dose") + ylab(bquote(~len[gth]~"[" ~mm^2~ "]")) +
ylim(0, 40) +
theme_classic() +
theme(legend.position = "top",
legend.title = element_text(face = "bold",size = 14),
axis.text = element_text(face = "bold",size = 12),
axis.title.y = element_text(face="bold",size = 14),
axis.title.x = element_text(face="bold",size = 14),
legend.text = element_text(face = "bold",size = 12))


Leider wird der Text bzw. die Formel (y-Achsen Beschriftung) mit Fett.
Hat jemand von euch eine Idee wie ich das Problem lösen könnte?
Ich Danke Euch sehr für Eure Mühe!

Viele Grüße
Robert

Muss es zwingend bquote sein?
Probier mal expression

Vielen Dank für die schnelle Lösung!