tests/testthat/test-chisq.R
In jpfitzinger/tidyfit: Regularized Linear Modeling with Tidy Data
test_that("chisq classification works", {
library(dplyr)
df_cls3 <- iris
df_cls2 <- iris |> filter(Species != "virginica")
m_reg1 <- classify(df_cls2, Species ~ ., m("chisq"))
m_reg2 <- classify(df_cls3, Species ~ ., m("chisq"))
expect_equal(nrow(coef(m_reg1)), 4)
expect_equal(nrow(coef(m_reg2)), 4)
})
jpfitzinger/tidyfit documentation built on July 3, 2025, 9:55 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
test_that("chisq classification works", {
library(dplyr)
df_cls3 <- iris
df_cls2 <- iris |> filter(Species != "virginica")
m_reg1 <- classify(df_cls2, Species ~ ., m("chisq"))
m_reg2 <- classify(df_cls3, Species ~ ., m("chisq"))
expect_equal(nrow(coef(m_reg1)), 4)
expect_equal(nrow(coef(m_reg2)), 4)
})
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.