9.13 Chapter 9 Review Questions 2
SpeedDate is a data frame with 200 observations and 22 variables (it has no missing data). Data come from a study of speed dating, in which each participant participated in a four-minute "date" with a member of the opposite sex. At the end of the date, they each rated the other on various attributes.
In this quiz, we will focus only on the ratings that females gave to males, and only on a few of the variables. Thus, the following variables are all females' ratings of their male date, each on a 10-point scale (except for two variables that indicate the race of each participants):
LikeFHow much the female likes the male (1-10 scale)AttractiveFFemale's rating of male's attractiveness (1-10 scale)IntelligentFFemale's rating of male's intelligence (1-10 scale)FunFFemale's rating of male as fun (1-10 scale)SincereFFemale's rating of male as sincere (1-10 scale)SharedInterestsFFemale's rating of male as having shared interests (1-10 scale)PartnerYesFFemale's estimate of chance the male wants another date (1-10 scale)RaceMMale's race: Asian, Black, Caucasian, Latino, or OtherRaceFFemale's race: Asian, Black, Caucasian, Latino, or Other
require(coursekata)
SpeedDate <- na.omit(SpeedDating)
# run your code here