dòng âm mưu đằng sau thanh cốt thép

Question

Tôi muốn tạo một thanh cốt thép nơi các thanh được vẽ trên đầu dòng ngang.

Các mã sau đây thực hiện việc này:

y <- c(1,2,3,5) 
barplot(y) 
abline(h=mean(y)) 
barplot(y, add=T) 

Tuy nhiên, tôi lo ngại rằng các tham số trong add=Tbarplot(), nếu sử dụng nhiều lần, có thể giới thiệu hiện vật in ấn. Tôi tò mò nếu có một thay thế cho mã trên (mặc dù mã trên có thể là phương pháp nhanh nhất).

Answer 1

Bạn chỉ có thể âm mưu gì trong cuộc gọi đầu tiên của bạn:

y <- c(1,2,3,5) 
barplot(rep(NA,length(y)),ylim=c(min(0,y),max(y)),axes=FALSE) 
abline(h=mean(y)) 
barplot(y, add=T) 

Answer 2

Nếu bạn sử dụng ggplot2, bạn không phải lo lắng về điều này. Vấn đề của bạn nắm trình tự Geom:

ggplot(data.frame(x=1:4, y=y), aes(x=x, y=y)) + 
    geom_bar(stat="identity") + 
    geom_hline(yintercept=mean(y), color="red") 

So:

ggplot(data.frame(x=1:4, y=y), aes(x=x, y=y)) + 
    geom_hline(yintercept=mean(y), color="red") + 
    geom_bar(stat="identity")