search for: errwidth

...uot;T2");syms=c(21,24) for (i in 1:2) { A=subset(RGR,treatment==trts[i]) points(x=A$xvals,y=A$yvals,pch=syms[i]) segments(A$xvals,A$yvals-A$errminus,A$xvals,A$yvals+A$errplus) #similar to symbols(x=A$xvals,y=A$yvals,boxplots=cbind(0,0,A$errminus,A$errplus,0.5),inches=FALSE,add=TRUE) errwidth=0.015 segments(A$xvals-errwidth,A$yvals+A$errplus,A$xvals+errwidth,A$yvals+A$errplus) segments(A$xvals-errwidth,A$yvals-A$errminus,A$xvals+errwidth,A$yvals-A$errminus) lines(x=A$xvals,y=A$yvals,lty=syms[i]) } #PS - this is a bit of an inelegant way to put on error bars, but to do better you #hav...