Греческий символ для метки оси в зоопарке R

Question

Я пытаюсь построить серию зоопарка с греческим символом в качестве метки оси.

Вот код:

mu_val <- 1
plot(1:10,101:110,main=bquote(mu~'='~.(mu_val)))  ## works fine
plot(1:10,101:110,ylab=bquote(mu~'='~.(mu_val)))  ## works fine
plot(zoo(101:110,1:10),main=bquote(mu~'='~.(mu_val)))  ## works fine
plot(zoo(101:110,1:10),ylab=bquote(mu~'='~.(mu_val)))  ## gives error
## Error in title(...) : invalid mathematical annotation

Есть идеи почему?

Answer 1

Мне кажется, это ошибка, потому что, как я уже говорил в комментариях, даже

plot(zoo(101:110,1:10),xlab=bquote(mu~'='~.(mu_val)))

работает. Я думаю, вы должны сообщить об этом zoo сопровождающие

Единственный способ заставить его работать - это использовать title

plot(zoo(101:110,1:10),ylab="")
title(ylab = bquote(mu~'='~.(mu_val)))

Answer 2

Ты можешь попробовать

plot(zoo(101:110,1:10),ylab=expression(paste(mu,"=1")))

если вы выполните traceback(), вы увидите, что проблема заключается в title функция от помощи ?title

They must be of type character or expression. In the latter case, quite a bit of mathematical
notation is available such as sub- and superscripts, greek letters, fractions, etc: see plotmath