バープロットにt値と信頼区間を追加するR

Question

私はRの非常に基本的なユーザーです。そのため、質問の簡単さや処方が不足している場合は事前にお詫びします。

私は1つの連続する数値変数と2つのレベルを持つ2つの要素を持つ大きなデータセットを持っています。

これは（多かれ少なかれ）生成/人工データに基づいて、私のデータの再構築である：

wordhigh.mu <- -2 
    wordlow.mu <- -2.5 
    pswordhigh.mu <- -1.5 
    pswordlow.mu <- -1.5 
    sigma <- 0.3 
wordshigh <- rnorm(50,mean = wordhigh.mu,sd=sigma) 
wordslow <- rnorm(50,mean = wordlow.mu,sd=sigma) 
pswordshigh <- rnorm(50,mean = pswordhigh.mu,sd=sigma) 
pswordslow <- rnorm(50,mean = pswordlow.mu,sd=sigma) 
value <- c(wordshigh,wordslow,pswordshigh,pswordslow) 
LexicalitySample <- c(rep("Word",100),rep("Pseudoword",100)) 
FrequencySample <- c(rep("High",50),rep("Low",50),rep("High",50),rep("Low",50)) 
new.table <- data.frame(ErpMinAv=value,Lexicality=LexicalitySample,Frequency=FrequencySample) 

私はggplotを使って自分のデータをプロットするために管理：

ExampleBarPlot <- ggplot(new.table,aes(Lexicality,ErpMinAv,fill=Frequency)) + geom_bar(stat="identity",position="dodge") + xlab("Lexicality") + ylab("Microvolts") + labs(title = "Frequency effect for singular nouns and pseudoword controls") + scale_y_continuous("Microvolts",breaks = round(seq(0, -20, by = -0.5),1)) + guides(fill=guide_legend(title="Frequency"))+ scale_colour_manual(values = c("blue","red")) 

プロットのように見えますこの：

私は、nをやりたいです擬似単語間の頻度の差は重要ではないが、単語間では有意であることを示すことである。そのためには、有意性統計（私の場合はt値）と信頼区間を持つことは素晴らしいことです。私はこれらの計算方法を知っていますが、バープロットにそれらを追加する方法はわかりません。

私はインターネットで広く見てきましたが、私が見たいものになった例が見つかりませんでした。

すべてのサポートをよろしくお願いします。

Answer 1

私は、平均と信頼区間が必要であると仮定します。

現在、スタックされた棒グラフがあるため、合計をプロットしています。

我々は手段を計算するためにstat_summary()を使用することができ、およびブートストラップ信頼区間：私たちは、境界線の色を追加するときにことがわかります返信用

ggplot(new.table, aes(Lexicality,ErpMinAv,fill=Frequency)) + 
    stat_summary(geom = 'bar', fun.y = mean, position = position_dodge(0.9)) + 
    stat_summary(geom = 'errorbar', fun.data = mean_cl_boot, position = position_dodge(0.9), 
       width = 0.5) + 
    scale_y_continuous("Microvolts",breaks = round(seq(0, -20, by = -0.5),1)) 

が