# NOT RUN {
x = ModelMatrix(uptake ~ Type, CO2)
rx = REG(uptake ~ Type, CO2, summarize=FALSE)
est(t(c(0, -1, 1)), x$X, rx) # Quevec - Mississippi
t.test(uptake ~ Type, CO2) # compare with the above
# }
Run the code above in your browser using DataLab