Extracting Parameters and model performance for models of oohbchoice

[donaldkip77]

I am trying to extract model parameters and performance but the package does not support models of class oohbchoice. Could you help? library(DCchoice) library(Icens) library(parameters) library(insight) library(modelsummary) library(performance) library(easystats) library(modelbased) library(see) data(oohbsyn) oohb1 <- oohbchoice(R1 + R2 ~ 1 | log(BL) + log(BH), data = oohbsyn) oohb2 <- oohbchoice(R1 + R2 ~ age + gender | log(BL) + log(BH), data = oohbsyn) summary(oohb2) summary(oohb2)$AIC summary(oohb2)$R2 summary(oohb2)$R1 r2(oohb2) model_performance(oohb2) model_parameters(oohb2)