2.12 The Chi-Square Distribution

# family of distributions parameterized by degrees of freedom
chisq_values <- rchisq(n = 10000, df = 5)

hist(chisq_values, breaks = 30)

# normalize distribution for QQ
chisq_values <- (chisq_values - mean(chisq_values))/sd(chisq_values)
qqnorm(chisq_values); qqline(chisq_values, col = 2)