在绘图中分配pch符号

Question

我有许多欧米茄值的情节，我希望在其中强调大约40个点。我正在使用的情节论点是：

plot( log( dog[ order( dog$gbm.dog ) , 8 ] ), 
     pch = ifelse( dog$refseq_mrna %in% dog_omegaplus$refseq_mrna, 2,
           ifelse( dog$refseq_mrna %in% dog_omegaminus$refseq_mrna, 12, "." ) ) )

我想让一组突出显示的点为三角形（pch = 2），另一组为正方形（pch = 12）和所有其他点点（＆＃34;。＆＃34 ）。问题是这个产生的图有pch符号应该是的数字（特别是＆＃34; 2＆＃34;应该有三角形和＃34; 1＆＃34;应该有正方形）。

如何正确指定符号？

Answer 1

这里的问题是使用＆＃34;。＆＃34;将2和12强制为字符值。我构建了一个简单的测试用例，看看发生了什么，以及我是否能找到一个令人满意的数字标记：

x <- 1:20

 ifelse(x < 5 , 2, ifelse(x > 15, 12, "."))
 [1] "2"  "2"  "2"  "2"  "."  "."  "."  "."  "."  "."  "."  "."  "."  "."  "."  "12" "12" "12" "12"
[20] "12"

# only return integers

plot(x, pch= ifelse(x < 5 , 2, ifelse(x > 15, 12, 20)))

Answer 2

帮助页面?points表示pch=46相当于pch="."，因此如果您在原始代码中将"."更改为46，那么一切都会保持为数字向量，应该给你你想要的东西。