ドットプロット内のエラーバーの垂直方向の終点を描画します

Question

latticeまたはDotplot()を使用して、Hmiscを使用して描画しています。私は、デフォルトパラメータを使用すると、私は小さな垂直終末

-O -

ずにエラーバーをプロットすることができますが、私は

を取得したいと思い| - o-- |

私は

を得ることができます知っている| -O - |

私はplotrixかlatticeExtraからsegplot()からcentipede.plot()を使用しますが、これらのソリューションは私にDotplot()ような素敵なコンディショニングオプションを与えることはありません。私は、などのエラーバーラインの色、幅を変更するためにうまく機能plot.lineのpar.settingsで再生しようとしましたが、これまでのところ、私は垂直方向の終末を追加するには失敗してきた：

require(Hmisc) 
mean = c(1:5) 
lo = mean-0.2 
up = mean+0.2 
d = data.frame (name = c("a","b","c","d","e"), mean, lo, up) 
Dotplot(name ~ Cbind(mean,lo,up),data=d,ylab="",xlab="",col=1,cex=1, 
     par.settings = list(plot.line=list(col=1), 
         layout.heights=list(bottom.padding=20,top.padding=20))) 

私はggplot2を使用するソリューションを教えてください...

Answer 1

Dotplot()の代わりにbarchart()と私はこれまで同じニーズがありました。

私の解決策は、カスタマイズされたパネル機能を作成することでした。（1）最初に元のパネル機能を実行します。 （2）次にpanel.arrows()を使用してエラーバーを追加します（頭のエッジがシャフトと90度の角度をなす2つの矢印を使用）。

は、ここでそれはDotplot()でどのように見えるかです：

# Create the customized panel function 
mypanel.Dotplot <- function(x, y, ...) { 
    panel.Dotplot(x,y,...) 
     tips <- attr(x, "other") 
     panel.arrows(x0 = tips[,1], y0 = y, 
        x1 = tips[,2], y1 = y, 
        length = 0.15, unit = "native", 
        angle = 90, code = 3) 
} 

# Use almost the same call as before, replacing the default panel function 
# with your customized function. 
Dotplot(name ~ Cbind(mean,lo,up),data=d,ylab="",xlab="",col=1,cex=1, 
     panel = mypanel.Dotplot, 
     par.settings = list(plot.line=list(col=1), 
         layout.heights=list(bottom.padding=20,top.padding=20)))