Description Usage Format Source References Examples
The High School and Beyond Project was a longitudinal study of students in the U.S. carried out in 1980 by the National Center for Education Statistics. Data were collected from 58,270 high school students (28,240 seniors and 30,030 sophomores) and 1,015 secondary schools. The HSB data frame is sample of 600 observations, of unknown characteristics, originally taken from Tatsuoka (1988).
1 |
A data frame with 600 observations on the following 15 variables. There is no missing data.
idObservation id: a numeric vector
gendera factor with levels male female
raceRace or ethnicity: a factor with levels hispanic asian african-amer white
sesSocioeconomic status: a factor with levels low middle high
schSchool type: a factor with levels public private
progHigh school program: a factor with levels general academic vocation
locusLocus of control: a numeric vector
conceptSelf-concept: a numeric vector
motMotivation: a numeric vector
careerCareer plan: a factor with levels clerical craftsman
farmer homemaker laborer manager military
operative prof1 prof2 proprietor protective
sales school service technical not working
readStandardized reading score: a numeric vector
writeStandardized writing score: a numeric vector
mathStandardized math score: a numeric vector
sciStandardized science score: a numeric vector
ssStandardized social science (civics) score: a numeric vector
Tatsuoka, M. M. (1988). Multivariate Analysis: Techniques for Educational and Psychological Research (2nd ed.). New York: Macmillan, Appendix F, 430-442.
High School and Beyond data files: http://www.sscnet.ucla.edu/issr/da/index/techinfo/I78961.HTM
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 | str(HSB)
# main effects model
hsb.mod <- lm( cbind(read, write, math, sci, ss) ~
gender + race + ses + sch + prog, data=HSB)
Anova(hsb.mod)
# Add some interactions
hsb.mod1 <- update(hsb.mod, . ~ . + gender:race + ses:prog)
heplot(hsb.mod1, col=palette()[c(2,1,3:6)], variables=c("read","math"))
hsb.can1 <- candisc(hsb.mod1, term="race")
heplot(hsb.can1, col=c("red", "black"))
# show canonical results for all terms
## Not run:
hsb.can <- candiscList(hsb.mod)
hsb.can
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.