powered by
Tests if a fit is a semi parametric or nonparametric model.
is_semiparametric(fit)
The result of the fit, obtained through the function MixNRMI1 or MixNRMI2.
TRUE if the fit is a semiparametric model
# NOT RUN { set.seed(150520) data(acidity) x <- enzyme out <- MixNRMI1(enzyme, extras = TRUE, Nit = 10) BNPdensity:::is_semiparametric(out) # }
Run the code above in your browser using DataLab