The pch
字符是实际的字体符号,因此您将受到字体中可用的内容的限制。另一种选择是使用原始绘图命令来制作您自己的“符号”。这是非常灵活的,尽管在混合两种方法时可能会出现调整大小等问题。这个方法是在nice中实现的my.symbols()
例子:
require(TeachingDemos)
bwDiamond <- function() {
plot.new()
polygon(c(0, 0.5, 1, 0.5, 0), c(0.5, 0, 0.5, 1, 0.5), lty=1)
polygon(c(0.25, 0.5, 1, 0.75, 0.25), c(0.25, 0, 0.5, 0.75, 0.25), col=1)
}
data <- c(1,2,3)
dev.new(width=4, height=4)
plot(data, type='n')
points(data[1:2], pch=c(23,18), cex=c(2.5,3))
my.symbols(data[3], data[3], symb=bwDiamond, symb.plots=TRUE, inches=0.22)
另请参阅此问答:R中的点符号 https://stackoverflow.com/questions/3739366/point-symbols-in-r