Sleuth3 (version 1.0-3)

case0102: Sex Discrimination in Employment

Description

The data are the beginning salaries for all 32 male and all 61 female skilled, entry--level clerical employees hired by a bank between 1969 and 1977.

Usage

case0102

Format

A data frame with 93 observations on the following 2 variables.

Salary

starting salaries (in US\(\$\))

Sex

sex of the clerical employee, with levels "Female" and "Male"

References

Roberts, H.V. (1979). Harris Trust and Savings Bank: An Analysis of Employee Compensation, Report 7946, Center for Mathematical Studies in Business and Economics, University of Chicago Graduate School of Business.

See Also

case1202

Examples

# NOT RUN {
attach(case0102)
str(case0102)   

boxplot(Salary ~ Sex, 
  ylab= "Starting Salary (U.S. Dollars)", 
  names=c("61 Females","32 Males"),
  main= "Harris Bank Entry Level Clerical Workers, 1969-1971")

hist(Salary[Sex=="Female"]) 
dev.new()
hist(Salary[Sex=="Male"])

t.test(Salary ~ Sex, var.equal=TRUE) # Equal var. version; 2-sided by default  
t.test(Salary ~ Sex, var.equal=TRUE, 
  alternative = "less")  # 1-sided; that group 1 (females) mean is less 
  
detach(case0102)  
# }