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)
--
Gregory (Greg) L. Snow Ph.D.
Statistical Data Center
Intermountain Healthcare
[EMAIL PROTECTED]
(801) 408-8111
> -----Original Message-----
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED] On Behalf Of Hans Ekbrand
> Sent: Thursday, November 01, 2007 7:13 AM
> To: r-help@r-project.org
> Subject: [R] ploting a comparison of two scores,including the
> labels in the plot
>
> Hello r-help!
>
> I have data with two kind of ratings on status of 100
> occupations. The first kind of rating is on the percieved
> "objective" status that these occupations have in society at
> large, and the second kind or rating is on the status that
> the respondents think that these occuption *should* have.
>
> The ratings were originally integer values in the rage 1-9,
> but in the current data, I use their mean values.
>
> Here is an printout for the first 10 occupations: (the
> occupation names are in swedish)
>
> > data.frame(myobj[1:10, c("YRKE", "SAMHM", "INDM")], row.names =
> > "YRKE")
> SAMHM INDM
> Ambassadör 8.32 7.2771
> Läkare ("doctor") 8.15 8.1029
> Domare ("judge") 8.14 7.5965
> Professor 8.13 7.5618
> Advokat ("lawyer") 7.95 7.1876
> Pilot 7.81 7.4380
> Verkställande direktör 7.78 6.8361
> Forskare ("scientist" 7.60 7.6630
> Civilingenjör ("engineer") 7.47 6.8802
> Statsråd ("minister") 7.41 6.3916
> >
>
> I would like to make a plot with two lists. The first list
> should list the occupations ordered by "SAMHM" (as in the
> printout above) and the values of SAMH. The linespacing in
> this list should be increased by the difference in SAMH
> between the the occupations (i.e. between "Ambassadör" and
> "Läkare" (eng. "doctor") there should be a larger
> linespaceing than between "Läkare" and "Domare" (eng. "judge")).
>
> The second list should be like the first, but based on "INDM"
> instead of "SAMH".
>
> These two list should ideally be plotted side by side with
> lines connecting each occuption.
>
> Here is an ascii-art illustration of what I intend (excluding
> the connecting lines, which are hard to draw with ascii :-)
>
> --------------------------------------
> Ambassadör
>
> Läkare ("doctor")
> Domare ("judge")
> Professor Läkare
>
> Advokat ("lawyer")
>
> Pilot
> Verkställande direktör
>
> Forskare ("scientist") Forskare
> Domare
> Civilingenjör ("engineer") Professor
> Statsråd ("minister") Pilot
> Ambassadör
> Advokat
>
>
> Civilingenjör
> Verkställande direktör
>
>
> Statsråd
> ----------------------------------------------
>
> If printing strings (labels) with different linespacing turns
> out to be problematic, another solution would be to print a
> list of the occupations ordered by "SAMH", points of "SAMH"
> values (with Y="SAMH"), points of "INDM" (with Y="INDM") and
> a list of occupations ordered by "INDM", with a line for each
> occupation connecting the labels with the points and the two
> points that represents the occupation.
>
> Since there are a lot of functions for ploting and I am new
> to R, I would like advise on what packages/functions that
> should be used to get what I want (if what I want is possible
> to achieve with R, if it is not, then please let me know).
>
> Sample code is, of course, also very much appreciated.
>
> kind regards,
>
> --
> Hans Ekbrand (http://sociologi.cjb.net)
> <[EMAIL PROTECTED]> A. Because it breaks the logical
> sequence of discussion Q. Why is top posting bad?
>
______________________________________________
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.
