3

我试图找出在这种情况下如何选择用于阶乘参数的符号：

plot(data.3$age,data.3$tl,pch=c(data.3$mu),col=c(data.3$mu),
cex=1.5,cex.lab=1.3,cex.axis=1.5,las=1,bty="n",xlab="Age (years)",
ylab="Male Total Length (mm)",ylim=c(0,780),xlim=c(0,20))

我使用过pch=as.numeric(factor)，但我希望能够自己选择符号，因为我发现默认符号很难相互区分。

我想这相当简单，但我真的试图找出如何做到这一点。

4

3 回答 3

4

您可以pch在此图中看到可用的值。（使图形窗口变宽以获得最佳观看效果。）

i <- -128:25
plot(i, pch = i, bg = "blue")

负数是ASCII 值。

我认为这就是你所要求的，但我不知道你为什么要画这样的情节。一组直方图或箱线图会更有意义。

dummy <- data.frame(
  x = 1:20, 
  y = factor(sample(letters[1:4], 20, replace = TRUE))
)
pch_lookup <- c(a = 3, b = 10, c = 15, d = 20)
with(dummy, plot(x, y, pch = pch_lookup[as.character(y)]))
于 2013-08-01T08:53:17.893 回答
3

符号和相关值的图形表示pch可以在许多页面上找到，例如，这里。

在此处输入图像描述

于 2013-08-01T08:51:50.440 回答
1

两个答案，选择哪个取决于您的因子水平的设置方式：

首先，如果您的因子水平从 1 开始，然后是连续的（因此在下面的示例中，因子水平是 1、2、3、4）：

plot(data.3$age,data.3$tl, pch = c(21,10,22,7)[as.numeric(pch=c(data.3$mu))] )

其次，如果您的因子水平不是连续的（假设您对更大的数据集进行了子集化，包含 7 个因子，但您只对绘制其中的 4 个感兴趣）：

plot(data.3$age,data.3$tl, pch = c(21,10,22,7)[as.numeric(as.factor(as.character(pch=c(data.3$mu))))] )
于 2013-12-23T18:02:21.497 回答