case0101 {Sleuth3}

Motivation and Creativity

Description

Data from an experiment concerning the effects of intrinsic and extrinsic motivation on creativity. Subjects with considerable experience in creative writing were randomly assigned to on of two treatment groups.

Usage

case0101

Format

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

Score

creativity score

Treatment

factor denoting the treatment group, with levels "Extrinsic" and "Intrinsic"

Source

Ramsey, F.L. and Schafer, D.W. (2013). The Statistical Sleuth: A Course in Methods of Data Analysis (3rd ed), Cengage Learning.

References

Amabile, T. (1985). Motivation and Creativity: Effects of Motivational Orientation on Creative Writers, Journal of Personality and Social Psychology 48(2): 393–399.

Examples

attach(case0101)  
str(case0101)  
boxplot(Score ~ Treatment)  # Basic boxplots for each level of Treatment

boxplot(Score ~ Treatment,  # Boxplots with labels
  ylab= "Average Creativity Score From 11 Judges (on a 40-point scale)",  
  names=c("23 'Extrinsic' Group Students","24 'Intrinsic' Group Students"), 
  main= "Haiku Creativity Scores for 47 Creative Writing Students") 

detach(case0101)