1 files changed, 4 insertions, 1 deletions
diff --git a/R/drplot.R b/R/drplot.R
index ded7aca..11c4d42 100644
--- a/R/drplot.R
+++ b/R/drplot.R
@@ -204,7 +204,10 @@ drplot <- function(drresults, data,
                         fit.row = fit.rows[j]
                         if (overlay) nl <- nl + 1 else nl = j
                         lty <- ltys[nl]
-                        if (drresults[[fit.row, "mtype"]] %in% c("probit", "logit", "weibull", "linlogit")) 
+                        if (drresults[[fit.row, "mtype"]] %in% c("probit",
+                                                                 "logit",
+                                                                 "weibull",
+                                                                 "linlogit")) 
                         {
                             m <- attr(drresults, "models")[[as.numeric(fit.row)]]
                             of <- function(x) {