在R中只为一个轴标签添加符号

Question

我正在尝试创建一个图表，其中在轴标签中，最大值包含一个大于或等于的符号。

我发现用unicode可以很容易地做到这一点：

xy <- cbind(runif(10, 0, 20), runif(10, 0, 20))

plot.new()
plot.window(xlim = c(0, 20), ylim = c(0,20))
points(xy)

axisLabels <- seq(0, 20, by = 5)

# add >= symbol to top axis label with unicode
axisLabels <- as.character(axisLabels)
axisLabels[5] <- paste('\u2265', axisLabels[5])


axis(1, at = seq(0, 20, by = 5), labels = axisLabels)
axis(2, at = seq(0, 20, by = 5), labels = axisLabels)

...但是，当您将图形导出为pdf时，这似乎不起作用。

如何使用expression或bquote或其他内容完成此操作？我之前使用过这些功能，但是当我只想将它应用于标签矢量中的一个元素时，无法弄清楚该怎么做。

最终，这段代码将成为R包的一部分，因此我正在寻找一种适用于用户的解决方案，他们可能希望他们可以将他们的情节从R保存为pdf。

我特意寻找的解决方案包括将变量而不是特定数字传递给轴标签参数，以及当用户尝试将绘图保存为pdf时不需要特殊处理的解决方案。