Я хотел бы отобразить последовательность целых чисел на последовательность литералов выражения, чтобы использовать последние в качестве меток для отметок на графике, например,

<code>lbls <- lapply(-2:2, function(i) expression(i * pi))
plot(...)
axis(1, at=seq(-2,2)*pi, labels=lbls)
</code>

До сих пор я пробовал все вариантыbquote, substitute, expression и т.д., что я мог придумать, но, видимо, я что-то упустил. Кроме того, часто задаваемые вопросы и связанные с ними вопросы & amp; ответы не полностью решили это для меня.

Как бы я сделал это правильно (я хочуaxis оказыватьpi как греческое письмо и есть-2 ... 2 заменилi в приведенном выше примере)?