# \donttest{
ctFitCovCheck(ctstantestfit, cor = TRUE, plot = TRUE)
gg=ctFitCovCheck(ctstantestfit, cor = FALSE, plot = TRUE, splitby = "TI1")
print(gg[[1]]+
ggplot2::ggtitle("Covariance Check for Y1 with all other manifest variables, split by TI1"))
# }
Run the code above in your browser using DataLab