알파 색상을 지정할 때 러그 플롯이 작동하지 않습니까?

Question

이 작동 :

plot(1:10, col=rgb(0,0,0,1)) 
rug(1:10, col=rgb(0,0,0,1)) 

을 그리고 이것은 (더 양탄자가 추가로 그려되지 않음) 작동하지 않습니다

plot(1:10, col=rgb(0,0,0,0.9)) 
rug(1:10, col=rgb(0,0,0,0.9)) 

이유는 무엇입니까? 어떻게 해결할 수 있습니까?

내가 필요로하는 이유는 겹치는 "깔개"가 더 어두워 지도록 알파 색상을 추가하고 싶기 때문입니다.

plot(rep(1:10,100), rep(1:10,100), col=rgb(0,0,0,1)) 
rug(jitter(rep(1:10,100)), col=rgb(0,0,0,1)) 

Answer 1

# This is quite easy to do with ggplot2 
# data 
df = data.frame(x = rep(1:10,100), y = rep(1:10,100)) 
# code 
library(ggplot2) 
ggplot(df, aes(x=x, y=y)) + 
    geom_point() + 
    geom_rug(sides="b", position="jitter", alpha=0.2, colour="blue") + 
    scale_x_continuous(breaks=seq(0,10,by=2)) + 
    scale_y_continuous(breaks=seq(0,10,by=2)) 

rug``의 기본 크기와