It being friday, I would like to call your attention to an innovative data analysis by Leslie Lamport available from: http://research.microsoft.com/users/lamport/pubs/hair.pdf I particularly liked the graphics. url: www.econ.uiuc.edu/~roger Roger Koenker email rkoenker at uiuc.edu Department of Economics vox: 217-333-4558 University of Illinois fax: 217-244-6678 Champaign, IL 61820
roger koenker wrote:> It being friday, I would like to call your attention to an innovative > data analysis by Leslie Lamport available from: > > http://research.microsoft.com/users/lamport/pubs/hair.pdf > > I particularly liked the graphics. > >Stone the flamin' crows, why didn't I think of that? Jim
Try this alternative:
# from http://research.microsoft.com/users/lamport/pubs/hair.pdf
hairsex <- matrix(
c(46, 45, 13, 12,
1, 101, 0, 20), 2, 4, byrow=TRUE)
dimnames(hairsex) <- list("Gender"=c("Female",
"Male"),
"Hair color"=c("Blond", "Brown",
"Red", "Other") )
library(vcd)
mosaic(hairsex, shade=TRUE)
There are uses for pie charts, but this isn't one of the better ones.
-Michael
roger koenker wrote:> It being friday, I would like to call your attention to an innovative
> data analysis by Leslie Lamport available from:
>
> http://research.microsoft.com/users/lamport/pubs/hair.pdf
>
> I particularly liked the graphics.
>
>
> url: www.econ.uiuc.edu/~roger Roger Koenker
> email rkoenker at uiuc.edu Department of Economics
> vox: 217-333-4558 University of Illinois
> fax: 217-244-6678 Champaign, IL 61820
>
> ______________________________________________
> R-help at 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.
>
--
Michael Friendly Email: friendly AT yorku DOT ca
Professor, Psychology Dept.
York University Voice: 416 736-5115 x66249 Fax: 416 736-5814
4700 Keele Street http://www.math.yorku.ca/SCS/friendly.html
Toronto, ONT M3J 1P3 CANADA
Michael,> Try this alternative: > > # from http://research.microsoft.com/users/lamport/pubs/hair.pdf > hairsex <- matrix( > c(46, 45, 13, 12, > 1, 101, 0, 20), 2, 4, byrow=TRUE) > dimnames(hairsex) <- list("Gender"=c("Female", "Male"), > "Hair color"=c("Blond", "Brown", "Red", "Other") ) > > library(vcd) > mosaic(hairsex, shade=TRUE) > > There are uses for pie charts, but this isn't one of the better ones.There are many kinds of mosaic plots, but this isn't one of the better ones. A multiple barchart looks good here. I did like your idea of using colours, it emphasised the number of women with dark blue hair. Antony [[alternative HTML version deleted]]