晶格，包含錯誤條

我正在用lattice構建條形圖。我有兩個單獨的表格，一個是手段，另一個是標準錯誤。我如何將標準錯誤包含在酒吧中？

table.df<-means 
table.std<-table_error 
library(lattice) 
library(gridExtra) 
graph1<-barchart(value1~Var1|Var2+Var3,data=table.df, ylab=NULL) 
graph2<-barchart(value2~Var1|Var2+Var3,data=table.df, ylab=NULL) 
grid.arrange(graph1,graph2, nrow=2, ncol=2)

有什麼建議嗎？這可能嗎？

barchart example

來源

2012-12-13 Francisco

嘗試看是否大空白是在文本，但它在圖像中，所以不適合編輯。我認爲我已經嘗試過（在很長時間內）找到一種方法來在格子術語中使用「超級標題」或什麼可以稱爲「超級標題」，但我已經空了。我希望別人有一個解決方案。（正確的術語是「脫光」，而不是「頭」如果你正在做檔案的任何搜索。） –

這似乎也成爲有關創建「炸藥陰謀」的問題。這種設計被許多人認爲是「可憐的形式」。這是弗蘭克哈雷爾的承擔：http://biostat.mc.vanderbilt.edu/twiki/bin/view/Main/DynamitePlots。因此，建議是使用更好的情節設計，例如箱式情節或小提琴情節。 –

這裏有兩個完全不同的問題，最好將它們分成兩個獨立的帖子。 –

雖然我與評論說，這可能是一個壞主意同意，這裏是一個解決辦法呢：

x <- rnorm(100, 10, 1) 
ind <- sample(c("one", "two"), 100, TRUE) 

dd <- data.frame(
    m = tapply(x, ind, mean), 
    ind = unique(ind), 
    se = tapply(x, ind, function(x) {sd(x)/sqrt(length(x))}) 
) 

lattice::barchart(ind ~ m, data = dd, xlim = c(8, 12), 
        se = dd$se, 
        panel = function(x, y, ...) { 
        panel.barchart(x, y, ...) 
        panel.segments(y0 = y, x0 = x - dd$se, 
            y1 = y, x1 = x + dd$se, ...) 
        })

Imgur

來源

2017-02-26 08:59:38

晶格，包含錯誤條

回答

相關問題