There are several bar chart tools available from R. We will use the barplot function in this example.
We can use this script:
# we are using the haireyecolor data from the MASS library library(MASS) summary(HairEyeColor)
Excellent p-value, so we should have good data to work with!
# display the data HairEyeColor
I hadn't thought about sex being a determinant. We will combine all of the data into one set:
# build a table of the information counts <- table(HairEyeColor) # produce the bar chart barplot(counts)
That produces this result:
Interesting, that there are many cases with high coincidence (the 34s, 50s, and 64s) and there are many with low numbers (most under 10).