修正轴标签中的排版

内容来源于 Stack Overflow,并遵循CC BY-SA 3.0许可协议进行翻译与使用

  • 回答 (2)
  • 关注 (0)
  • 查看 (25)

创造出版级的图形从R没有后处理.。我研究所的其他研究人员总是在图形软件(如AdobeIlluStrator)中进行后处理。

我的抱怨是R没有对负数使用正确的减号(特别是在地轴中):

plot(-20:-1, rnorm(20) + 1 : 20)

我需要使用正确的Unicode字符再编码(U+2212,“-”)。我的一位朋友在出版前替换了AdobeIlluStrator中的所有负号,但我不禁认为,必须有一个更好的方法--从R内部--来实现这一点;强迫我手动替换所有的轴标签。

提问于
用户回答回答于

可以让R计算轴的刻度:

plot(-20:-1, rnorm(20) + 1 : 20, xaxt="n")
at <- axTicks(1, usr=par("usr")[1:2])
labs <- gsub("-", "\U2212", print.default(at))
axis(1, at=at, labels=labs)
用户回答回答于

或者手动绘制轴和标签,而不是接受默认值?

plot(-20:-1, rnorm(20) + 1 : 20, xaxt="n")
Axis(-20:-1, at=seq(-20,-5,5), side=1,
  labels=paste("\U2212",seq(20,5,-5),sep=""))

扫码关注云+社区