ggplot을 사용하여 R에 오차 막대 추가

LWP로 두 개의 범주 형 변수 (처리)를 그려 R으로 플롯을 만들고 싶습니다.ggplot을 사용하여 R에 오차 막대 추가

점 (채우기)의 색을 rootpatH 변수 (각 처리에서 점 하나)와 일치하도록 변경하고 싶습니다. 차이가 유의 적 또는하지 않은 경우 나 또한 표기법을 추가 할

Plants.means<-aggregate(Plants[10:44],Plants[c(6,9)],mean,na.rm=TRUE) 

SE<-function(x)(sd(x,na.rm=TRUE)/ (length(x)-sum(is.na(x)))^0.5) 


ggplot(Plants.means, aes(x=Treat, y=Yield, group=1)) + 
geom_errorbar(width=.1, aes(ymin=Yield-SE(Plants.means$Yield), ymax=Yield+SE(Plants.means$Yield))) + 
geom_point(shape=21, size=3, fill="white") + 
ylim(0,1750)

내가 대신 SE의 95 % CI를 나타내는 오차 막대를 변경하고 싶습니다.

취급이 범주 ROOTPATH이 범주입니다 LWP_meas2는 연속 벤 당신은 아마 데이터가 제공되지 이후 테스트하지 필요성이 같은 (원하는 말했듯이

enter image description here

출처

2013-02-02 user1977802

'SE'는 숫자가 아닌 함수이며, 아마도'SE (something)'를 원할 것입니다 ... –

각각의 점 집합 옆에 "ns"및 "*"라는 텍스트를 추가하면 어떻게 다를지를 나타낼 수 있습니까? – user1977802

을

error <- function(x)(qt(0.975,df=length(x)-1)*sd(x)/sqrt(length(x))) 

ggplot(Plants.means,aes(x=Treat, y=Yield, colour=rootpatH, group=rootpatH)) + 
geom_errorbar(aes(ymin=Yield-error(Plants.means$Yield),ymax=Yield+error(Plants.means$Yield)), colour="black",width=.1, position=pd) + 
geom_point(position=pd, size=4)

출처

2013-02-03 03:44:37 user1977802

with(Plants.means, 
       errbar(x =Treat, y = LWP_Meas2, 
           yplus = LWP_Meas2 + SE(LWP_Meas2), 
           yminus = LWP_Meas2 - SE(LWP_Meas2), 
     add=T,na.rm=TRUE, col=c("blue", "hotpink")) 
    )

출처

2013-02-03 01:19:46

ggplot을 사용하여 R에 오차 막대 추가

답변

관련 문제