在地块中分配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)和所有其他点点(".")。问题是，这产生的图形有数字，其中pch符号应该是(特别是有三角形的"2“和有正方形的"1”)。

如何正确指定符号？

Answer 1

这里的问题是使用“。”强迫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，那么一切都将保持为数字向量，并且应该给出您想要的东西。