Ich möchte eine Folge von ganzen Zahlen auf eine Folge von Ausdrucksliteralen abbilden, um letztere als Häkchenmarkierungen in einem Plot zu verwenden, z.

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

Bisher habe ich alle Variationen von ausprobiertbquote, substitute, expression usw., an die ich denken könnte, aber anscheinend muss ich etwas verpasst haben. Auch die FAQ und damit zusammenhängende SO-Fragen & Antworten haben dies für mich nicht vollständig gelöst.

Wie würde ich es richtig machen?axis zu rendernpi wie der griechische buchstabe und haben-2 ...2 Ersetzt durchi im obigen Beispiel)?