晶格，包含错误条

我正在用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

晶格，包含错误条

回答

相关问题