繪圖中的標誌值？

Question

我使用TeachingDemos包創建了我的數據，下面有一個點圖。我想繪製一些不同顏色的數據點。這些由下面的*標記。 Sitbu已經回答了這部分內容，但現在我想在密度圖和直方圖中標記這些點？

輸入：

a1<- c(0.2,0.3,0.5) 
a2<-c(1,0.9,0.7) 
a3<-c(0.8,0.1,0.12) 
a4<-c(0.4,2,0.33) 
a<-cbind(a1,a2,a3,a4) 
a 
    a1 a2 a3 a4 
[1,] 0.2 1.0* 0.80 0.40 
[2,] 0.3 0.9* 0.10 2.00* 
[3,] 0.5 0.7 0.12 0.33 

dots(a) 

1

我想這樣一個情節： 2

另外，我想標誌，在密度圖和HIST劇情點？

density(a) 

hist(a) 
lines(d, col="red") 

Answer 1

看來您正在使用教程中的0123Dev函數。看它的源代碼，我可以重現你的第一個情節如下：

x <- a 
y <- as.vector(table(x)) 
plot(x, y, ylab = "Count") 

的訣竅是現在，挑選，應該是從X紅色和它們的顏色設置爲紅色的點。這可以通過首先創建一個包含"black"每個點的載體來完成，然後通過"red"覆蓋一些：

dot_col <- rep("black", length(a)) 
red_x <- c(1.0, 0.9, 2.00) 
dot_col[match(red_x, x)] <- "red" 
plot(x, y, col = dot_col, ylab = "Count") 

Answer 2

您沒有提供用於創建您的地塊的代碼，但一般而言，您可以使用col論點情節變化點的顏色。通過將col設置爲顏色值的矢量，可以更改圖中每個點的顏色。