On Mon, Nov 05, 2007 at 10:51:08AM -0700, Greg Snow wrote:
> Does the following do what you want (or at least start you in the correct
> direction)?
>
> mydata <- data.frame( job=c("Ambassadör","Läkare","Domare",
> "Professor","Advokat","Pilot","Verkställande direktör","Forskare",
> "Civilingenjör","Statsråd"), SAMHM= c(8.32, 8.15, 8.14, 8.13, 7.95,
> 7.81, 7.78, 7.60, 7.47, 7.41), INDM= c( 7.2771, 8.1029, 7.5965,
> 7.5618, 7.1876, 7.4380, 6.8361, 7.6630, 6.8802, 6.3916))
>
>
> tmp <- c(rbind( mydata$SAMHM, mydata$INDM, NA ))
> tmp2 <- rep( c(1,2,NA), nrow(mydata) )
>
> plot(tmp2, tmp, type='b', xlim=c(0,3), xlab='', ylab='rating')
> text(0.9, mydata$SAMHM, mydata$job, adj=1, cex=0.75)
> text(2.1, mydata$INDM, mydata$job, adj=0, cex=0.75)Yes, definately! Thanks Greg, now I'll just increase the smallest differences to a minimum so the labels becomes readable. -- Hans Ekbrand (http://sociologi.cjb.net) <[EMAIL PROTECTED]> A. Because it breaks the logical sequence of discussion Q. Why is top posting bad?
signature.asc
Description: Digital signature
______________________________________________ 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.
