Добавление греческого символа к заголовку оси

Question

Я хочу добавить греческий символ к оси Y моего графика в R.
Проблема в том, что мне нужно, чтобы этот персонаж был включен в заголовок. Я хочу написать:

Diameter of aperture ("mu"m)

в метке оси.

С

ylab=expression()

Я могу написать греческий символ, с

ylab="axis title"

Я могу написать название с правильными пробелами между словами.

Но я не могу найти способ собрать все это вместе и написать правильную метку с греческим словом на метке оси. Надеюсь, я был достаточно ясен.

Answer 1

Если вы используете plotmath{grDevices}, главная страница справки ( plotmath ) содержит пример того, что вам нужно:

xlab = expression(paste("Phase Angle ", phi))

или для вашего случая яугадайте:

ylab = expression(paste("Diameter of aperture ( ", mu, " )"))

Это работает для вас?

Answer 2

Думаю, я правильно поняла ваш вопрос.~ устанавливает пробел между символами в вызове на expression().Это то, что вы хотите?

plot(1:3, ylab = expression("Diameter of apeture (" * mu ~ "m)"),
  , xlab = expression("Force spaces with ~" ~ mu ~ pi * sigma ~ pi)
  , main = expression("This is another Greek character with space" ~ sigma))

Answer 3

А если вы хотите заменить переменные в тексте, используйте bquote. Например, если у вас есть переменная mu и вы хотите показать ее в заголовке, используйте следующую идиому:

mu <- 2.8
plot(1:3, main=bquote(mu == .(mu)))

Часть, заключенная в .(), будет заменена, так что будет напечатано значение mu, а не греческий символ "mu". Обратитесь за помощью к справке R по номеру bquote.

Answer 4

Это должно быть намного проще с latex2exp:

require(latex2exp)
plot(1, xlab = TeX('$\\mu$'))

Answer 5

И, если вы имели дело с оценочным количеством, plotmath{grDevices} также предлагает возможность добавить шапку к вашему греческому письму:

ylab = expression(paste("Diameter of aperture ( ", hat(mu), " )"))

mu, заключенный в hat(), добивается цели.