powered by
Data for Exercise 1.32
Parented
A data frame with 6 observations on the following 3 variables.
Educat
a factor with levels 4yr college degree Doctoral degree Grad degree H.S grad or less Some college Some grad school
4yr college degree
Doctoral degree
Grad degree
H.S grad or less
Some college
Some grad school
Mother
a numeric vector
Father
# NOT RUN { str(Parented) attach(Parented) MAT <- cbind(Mother, Father) row.names(MAT) <- Educat MAT barplot(t(MAT),beside=TRUE,legend=TRUE,col=c("blue","red")) detach(Parented) remove(MAT) # }
Run the code above in your browser using DataLab