support oohbchoice

Author: strengejacke

DESCRIPTION

@@ -1,7 +1,7 @@
 Type: Package
 Package: performance
 Title: Assessment of Regression Models Performance
-Version: 0.12.4.16
+Version: 0.12.4.17
 Authors@R:
     c(person(given = "Daniel",
              family = "Lüdecke",

NAMESPACE

@@ -407,6 +407,7 @@ S3method(r2,negbinirr)
 S3method(r2,negbinmfx)
 S3method(r2,nestedLogit)
 S3method(r2,ols)
+S3method(r2,oohbchoice)
 S3method(r2,phylolm)
 S3method(r2,plm)
 S3method(r2,poissonirr)

R/r2.R

@@ -706,12 +706,19 @@ r2.fixest <- function(model, ...) {
   structure(class = "r2_generic", out)
 }
 
+
 #' @export
 r2.fixest_multi <- function(model, ...) {
   lapply(model, r2.fixest)
 }
 
 
+#' @export
+r2.oohbchoice <- function(model, ...) {
+  NULL
+}
+
+
 #' @export
 r2.felm <- function(model, ...) {
   model_summary <- summary(model)