worked perfectly. kia ora! :) On Thu, May 20, 2010 at 1:19 PM, Peter Alspach < peter.alsp...@plantandfood.co.nz> wrote:
> Tena koe Anthony > > You could try: > > segments(rep(0,6), 2:7, rep(2.3, 6), 2:7) > > HTH ... > > Peter Alspach > > > -----Original Message----- > > From: r-help-boun...@r-project.org [mailto:r-help-boun...@r- > > project.org] On Behalf Of Anthony Lopez > > Sent: Friday, 21 May 2010 5:39 a.m. > > To: R-help@r-project.org > > Subject: [R] lines on plot > > > > Is there an easier way to make this graph *without* having to specify > > all of > > the separate segment arguments at the end? > > > > > x <- c(1,2) > > > off <- c(4,5.5) > > > def <- c(5.5,5.9) > > > par(fg="lightblue4") > > > > > > plot(x,off,type="o",col="dodgerblue4",ylim=c(2,7),xlim=c(0.7,2.3),axes= > > F,xlab="Labor > > Condition",ylab="Willingness to Join",lwd=3) > > > lines(def,type="o",pch=22,lty=2,col="firebrick",lwd=3) > > > axis(1,at=x,lab=c("Sufficient","Insufficient")) > > > axis(2,at=2:7,lab=c("2","3","4","5","6","7")) > > > segments(0,2,2.3,2) > > > segments(0,3,2.3,3) > > > segments(0,4,2.3,4) > > > segments(0,5,2.3,5) > > > segments(0,6,2.3,6) > > > segments(0,7,2.3,7) > > > > anthony > > > > [[alternative HTML version deleted]] > > > > ______________________________________________ > > R-help@r-project.org mailing list > > https://stat.ethz.ch/mailman/listinfo/r-help > > PLEASE do read the posting guide http://www.R-project.org/posting- > > guide.html > > and provide commented, minimal, self-contained, reproducible code. > [[alternative HTML version deleted]] ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
