# NOT RUN {
Comp_data = comp_Model(n = 50, p = 30)
Comp_fit = compCL(y = Comp_data$y, Z = Comp_data$X.comp, Zc = Comp_data$Zc,
intercept = Comp_data$intercept)
plot(Comp_fit)
plot(Comp_fit, xlab = "norm", label = TRUE)
# }
Run the code above in your browser using DataLab