Chciałbym odwzorować sekwencję liczb całkowitych na sekwencję literałów wyrażenia, aby użyć tej ostatniej jako znacznika zaznaczenia na wykresie, np.

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

Do tej pory próbowałem wszystkich odmianbquote, substitute, expression itd., o czym mogłem myśleć, ale najwyraźniej coś mi brakowało. Ponadto często zadawane pytania i odpowiedzi na pytania i odpowiedzi dotyczące SO nie rozwiązały tego w pełni.

Jak bym to zrobił poprawnie (chcęaxis renderowaćpi jak litera grecka i mieć-2 ...2 zastąpiony przezi w powyższym przykładzie)?