R 프로그램에서 막대그래프 그리기 + 오류바
막대그래프는 5분만에 그렸지만 에러버그리기까지 2시간 걸린 자신을 위해.. 막대그래프는 5분만에 그렸지만 에러버그리기까지 2시간 걸린 자신을 위해.. CG, CSG, SG의 함수율 값을 그래프로 나타내자..! 반복실험을4번하고,값은그룹당4개씩먼저replicon값을각각그래프로나타내봅시다 CG, CSG, SG의 함수율 값을 그래프로 나타내자..! 반복실험을4번하고,값은그룹당4개씩먼저replicon값을각각그래프로나타내봅시다 CG=c(95.53、93.36、95.34、95.33)CSG=c(73.40、73.47、69.45、73.62)SG=c(83.2,84.6,83.1,84.7)mat2=cbind(CG、CSG、SG)barplot(mat2,beside=T,main=”関数率の評価”,ylab=”Water Content(%)”,imyl=(0cylabyl軸)の平均値の最小値における。 CG=c(95.53、93.36、95.34、95.33)CSG=c(73.40、73.47、69.45、73.62)SG=c(83.2,84.6,83.1,84.7)mat2=cbind(CG、CSG、SG)barplot(mat2,beside=T,main=”関数率の評価”,ylab=”Water Content(%)”,imyl=(0cylabyl軸)の平均値の最小値における。 x<-rbind(c(95.53,73.4,83.2),c(93.36,73.47,84.6),c(95.34,69.45,83.1),c(95.33,73.62,84.7))colnames(x)<-c(“CG”,”CSG”,”SG”)rownames(x)<-c(“rep1″,”rep2″,”rep3″,”rep4″)xm<-apply(x,2,mean)xs<-apply(x,2,sd)b<-barplot(xm,xlab=”gel”,ylab=”Water Content(%)”,ylim=c(0,100))arrows(b,xm-xs,b,xm+xs,code=3,lwd=1,angle=90,length=0. 1)끝 처음엔 ggplot으로 그려보려고 했는데 외국인 유튜브 영상을 보고 포기, 이게 제일 쉬운 것 같아 *R […]
R 프로그램에서 막대그래프 그리기 + 오류바 Read More »