diff --git a/resources/real_data_example.R b/resources/real_data_example.R index f9ebe72..f59aaa4 100644 --- a/resources/real_data_example.R +++ b/resources/real_data_example.R @@ -12,9 +12,9 @@ iv.sample.count <- iv.example$cc_ex_tox.likes.race_disclosed.medsampsample.count dv.sample.count <- dv.example$cc_ex_tox.likes.race_disclosed.largesampsample.count -plot.cc.example <- function(datalist, name, varnames=NULL, varorder=NULL, include.models=c("Automatic Classification", "All Annotations")){ +plot.cc.example <- function(datalist, name, varnames=NULL, varorder=NULL, include.models=c("Automated Classifications", "Manual Annotations")){ - model.names <- c("Automatic Classification", "All Annotations", "Annotation Sample", "Error Correction") + model.names <- c("Automated Classifications", "Manual Annotations", "Annotation Sample", "Error Correction") glm.par.names <- paste0(name,"coef_",c("pred", "coder", "sample"), "_model")