fix

strengejacke · strengejacke · commit a66eb6c4f97f · 2023-05-23T10:16:05.000+02:00
diff --git a/R/methods_nestedLogit.R b/R/methods_nestedLogit.R
@@ -28,6 +28,12 @@ model_parameters.nestedLogit <- function(model,
     }
   }
 
+  # "component" might be set to "conditional", when called from "compare_parameters()"
+  # set to "all" here.
+  if (identical(component, "conditional")) {
+    component <- "all"
+  }
+
   # profiled CIs may take a long time to compute, so we warn the user about it
   if (any(unlist(insight::n_obs(model)) > 1e4) && identical(ci_method, "profile")) {
     insight::format_alert(

Original file line number	Diff line number	Diff line change
`@@ -28,6 +28,12 @@ model_parameters.nestedLogit <- function(model,`
`28`	`28`	`}`
`29`	`29`	`}`
`30`	`30`
	`31`	`+ # "component" might be set to "conditional", when called from "compare_parameters()"`
	`32`	`+ # set to "all" here.`
	`33`	`+ if (identical(component, "conditional")) {`
	`34`	`+ component <- "all"`
	`35`	`+ }`
	`36`	`+`
`31`	`37`	`# profiled CIs may take a long time to compute, so we warn the user about it`
`32`	`38`	`if (any(unlist(insight::n_obs(model)) > 1e4) && identical(ci_method, "profile")) {`
`33`	`39`	`insight::format_alert(`