2016-10-17 2 views
0

다른 CO2, 종 및 일 중에서 기공 전도도를 플롯합니다. 독립면에 주석을 추가 할 때 오류가 발생했습니다.

p<-ggplot(data=gssummary,aes(x=factor(day),y=Cond,fill=factor(co2)))+geom_bar(stat = "identity",position = "dodge",width=0.4,colour="black")+geom_errorbar(aes(ymin=Cond-ci,ymax=Cond+ci), width=.1,position = position_dodge(0.4))+theme_bw()+theme(panel.grid=element_blank())+labs(x="Day",y=expression(plain("g"["s"])))+facet_grid(~species)+theme(axis.ticks=element_line(size=rel(0.1)))+theme(axis.text=element_text(size = rel(0.5),family = "Times"))+theme(axis.title=element_text(size = 7,family = "Times"))+theme(plot.margin=unit(c(0,3,0,0),"cm"))+theme(strip.text=element_text(size=rel(0.6),family = "Times"),strip.background=element_rect(colour = "white",fill = "white"))+theme(panel.border=element_rect(colour = "black",size = 1))+guides(fill=guide_legend(title=NULL))+scale_fill_grey(start = 1,end = 0.75,labels=c(expression(plain("aCO"["2"])),expression(plain("eCO"["2"])))) 

은 (차이는 종 2016년 9월 2일에 aco2 및 ECO2 사이에서만 유의 한 0) 플롯 의미의 정보를 추가

siglabel<-data.frame(species=c("0","1"),label=c("*"," ")) 
p+geom_text(x=1,y=0.6,aes(label=label),data = siglabel) 

오류 : 미학의 길이는 하나 여야합니다 dataProblems로, 또는 같은 길이 : 라벨

stomatal conductance

gssummary

시도했지만 여전히이 문제를 해결할 수 없습니다. 해결 방법을 알려주세요. 고마워요!

+0

"ggsumary"를 그림 대신 코드로 추가 할 수 있습니까 (아마도'dput'을 사용하지만 R에서 복사하여 붙여 넣기 만해도됩니까?). 하지만 "siglabel"에는 두 개의 행이 있지만 x 및 y 좌표는 한 세트 만 있습니다. 어쩌면 당신은 "siglabel"의 부분 집합을 그려야할까요? – aosmith

+0

나는 그 문제가 무엇인지 알고 그것을 해결했다. 하지만 여전히 내 질문에 대한 당신의 배려에 감사드립니다. – pandaJ

+0

솔루션을 답으로 사용할 수 있습니다. – aosmith

답변

0

실제로 문제는 레이블의 길이가 gssummary의 길이와 같지 않다는 점입니다. 나는 다음과 같이 코드를 변경했다.

siglabel < -data.frame (종 = c ("0", "0", "1", 1), co2 = c ("0", "1", "0", "1 "), 라벨 = C ("* "," "," "," "))

P + geom_text (X = 1, Y는 0.6, AES (라벨 = 상표) 데이터 = siglabel를) =

관련 문제