r - 如何在 R 中的绘图中添加破折号？

Question

我正在 R 中创建一个绘图，并且需要向某些轴标签添加一个破折号，而不是日常的连字符。

axis(1, at=c(0:2), labels=c("0-10","11-30","31-70"))

我在 Linux 上运行 R 版本 2.8.1。

Answer 1

老问题，但仍然是一个问题......

我在 OSX 10.12.2 上使用 R vsn 3.3.2，使用plot() 绘制 pdf 文件，并将其导入到 Affinity Designer vsn 1.5.4 中。 “2-0”形式的轴标签显示在 Affinity Designer 中，其中破折号与“0”重叠。我不知道问题是否出在 Affinity Designer 或 pdf 文件上还是什么。如果能够尝试各种 Unicode 破折号字符，那就太好了，但是 R 和 pdf 文件似乎都还没有完全具备使用默认字体处理 Unicode 的能力。

解决方案:R中的“cairo”包:

library("cairo")
d = 0:11
names(d) = paste(0:11, "-", 11:0, sep="")
names(d) = gsub("-", "\U2012", names(d)) # U+2012 is "figure dash"
d
barplot(d)
cairo_pdf(filename="x.pdf", width=11, height=8)
barplot(d)
dev.off()

破折号显示在 R 控制台、默认 R 绘图设备以及使用 Preview 和 Affinity Designer 查看的 pdf 文件中。