R par set 无法更改

Question

不知如何正常使用no.readonly的par set。如下代码，

par1 <- par(no.readonly=TRUE)
set.seed(2015)
xx<-rnorm(100)
par(pch=17,col="red")
plot(xx)

par2 <- par(no.readonly=TRUE) # par2 pch=17,col='red'
par(pch=17,col="blue")
plot(xx)

par(par2)
plot(xx,main="why the color is black not red?") 
# why this time the col is default 'black'?

有人可以帮我像以前一样使用 par 设置红色吗？为什么这个时间标准对 col 无效但对 pch 有用？

Answer 1

您的颜色正在被列表中的其他元素覆盖。为了证明：

par(col = "blue")
par("col")
# [1] "blue"
par(fg = "red")
par("col")
# [1] "red"

（我不确定还会有多少其他更重要的元素，但这可能会影响到你。）

如果您想保存/重复使用"col" 和"pch"，也许您应该保存它们（而不是列表的其余部分）。