Ggplot2: Стиль шрифта в выражении метки

Изменение шрифтов и размеров шрифтов хорошо работает без выражения в ярлыках. Вот код, где у меня проблема, чтобы изменить грани шрифта в выражении метки.

p <- ggplot(data = mtcars, aes(x=wt, y=mpg)) + 
    geom_point() + 
    labs(x="Weight", y=expression(paste("mpg (  ", m^{-2}, ")"))) + 
    theme(axis.title.x = element_text(family="serif", face="bold", 
        size=12, angle=00, hjust=0.54, vjust=0)) + 
    theme(axis.title.y = element_text(family="serif", face="bold", 
        size=12, angle=90, vjust=0.25))

p

Output

Любая помощь будет высоко оценен. Спасибо

Ответы

Ответ 1

Я не думаю, что это присутствие expression, хотя вы не говорите точно, что это такое, что вы видите, поэтому трудно быть уверенным. На Mac вы получаете xlab шрифтом полужирным шрифтом, но ylab не является смелым (хотя он находится в серине). Если я использую plotmath bold он преуспевает внутри функции выражения:

p <- ggplot(data = mtcars, aes(x=wt, y=mpg)) + 
geom_point() + 
    labs(x = "Weight", y = expression(bold(mpg (m^-2) ))) +
    theme(axis.title.y = element_text(family="serif", 
        size = 12, angle = 90, vjust = 0.25)) +
    theme(axis.title.x = element_text(family="serif",
        size = 12, angle = 0, hjust = 0.54, vjust = 0))
p

Как всегда, графические устройства часто являются OS-переменными, и вы не предлагали никаких намеков на ваши, поэтому дальнейшие комментарии блокируются.

(EDIT: Если вы укажете экспонента -2, вы можете получить его полужирным шрифтом() -ed.)

expression( bold(mpg (m^bold("-2")) ) ) )