# NOT RUN {
# Pygmalion in the Classroom: Teacher Expectation and Pupils' Intellectual Development.
# This dataset has been used to illustrate heterogeneity of regression
# by Maxwell, Delaney, and Kelley (2018).
nA <- 64
nB <- 246
muz <- 0
sigma2 <- 175.3251
sigmaz2 <- 348.9099
betaA <- 0.96895
betaB <- 0.77799
var.ete(sigma2=sigma2, sigmaz2=sigmaz2, n1=nA, n2=nB, beta1=betaA, beta2=betaB,
type="sample", covariate.value = "sample.mean")
var.ete(sigma2=sigma2, sigmaz2=sigmaz2, n1=nA, n2=nB, beta1=betaA, beta2=betaB,
type="sample", covariate.value = "SD")
var.ete(sigma2=sigma2, sigmaz2=sigmaz2, n1=nA, n2=nB, beta1=betaA, beta2=betaB,
c = 4.2631, muz=muz, type="sample",covariate.value = "fixed")
# }
Run the code above in your browser using DataLab