Introduction to Statistics (MAT/SST 115.03 2008S)

R notes for Activity 25-4: Pursuit of Happiness

PoliticalHappiness = data.frame(
  row.names = c("Very Happy", "Pretty Happy", "Not Too Happy"),
  Liberal = c(90, 177, 51),
  Moderate = c(128, 291, 76),
  Conservative = c(187, 258, 48))
ExpectedPH = rowSums(PoliticalHappiness) %o% colSums(PoliticalHappiness)/sum(PoliticalHappiness)

Creative Commons License

Samuel A. Rebelsky,

Copyright (c) 2007-8 Samuel A. Rebelsky.

This work is licensed under a Creative Commons Attribution-NonCommercial 2.5 License. To view a copy of this license, visit or send a letter to Creative Commons, 543 Howard Street, 5th Floor, San Francisco, California, 94105, USA.