Determine object is has class unsupervised_fit
Examples
model_fit <- list(letters)
is_unsupervised_fit(model_fit)
#> [1] FALSE
model_fit <- new_unsupervised_fit(model_fit)
is_unsupervised_fit(model_fit)
#> [1] TRUE
Determine object is has class unsupervised_fit
model_fit <- list(letters)
is_unsupervised_fit(model_fit)
#> [1] FALSE
model_fit <- new_unsupervised_fit(model_fit)
is_unsupervised_fit(model_fit)
#> [1] TRUE