圖形條形圖和錯誤欄與R

Question

我有一個csv文件有兩列，我想用錯誤條來繪製它。

a,b 
1207,1457 
2520,1207 
1328,1136 
1393,1112 
8984,7680... 

但是我下面的代碼無法正常工作：

> data.means<-lapply(data, mean, na.rm = TRUE) 
> data.sd <- lapply(data,sd) 
> x = barplot(data.means, ylim=c(0,10000)) 
*Error in -0.01 * height : non-numeric argument to binary operator* 
> error.bar(barx,data.means, 1.96*data.sd/10) 

Answer 1

使用sapply代替lapply的。 lapply創建一個列表，但barplot需要一個向量或矩陣。

data.sd <- sapply(data,sd) 

x = barplot(data.means, ylim=c(0,10000))