Skip to content

Commit

Permalink
fix
Browse files Browse the repository at this point in the history
  • Loading branch information
strengejacke committed Nov 20, 2023
1 parent 204655f commit f66fc39
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion tests/testthat/test-survey.R
Original file line number Diff line number Diff line change
Expand Up @@ -8,7 +8,7 @@ withr::with_environment(
svychisq <<- survey::svychisq

data(api, package = "survey")
dclus1 <- survey::svydesign(id = ~dnum, weights = ~pw, data = apiclus1, fpc = ~fpc)
dclus1 <<- survey::svydesign(id = ~dnum, weights = ~pw, data = apiclus1, fpc = ~fpc)
m <- survey::svytable(~ sch.wide + stype, dclus1)
mp <- model_parameters(m)
expect_named(mp, c("F", "df", "df_error", "p", "Method"))
Expand Down

0 comments on commit f66fc39

Please sign in to comment.