Gender Dif about conquestr HOT 1 CLOSED

library(conquestr)
x <- system.file("extdata", "dif.shw", package = "conquestr")
df <- cq_show(x, fit = FALSE)
df
#> # A tibble: 3 x 2
#>   term     data              
#>   <chr>    <list>            
#> 1 grp      <tibble [2 × 13]> 
#> 2 item     <tibble [20 × 13]>
#> 3 item*grp <tibble [40 × 15]>

df$data[[1]]
#> # A tibble: 2 x 13
#>   grp_index   grp    est   err uw_mnsq uw_ci_lo uw_ci_hi  uw_t  mnsq ci_lo
#>       <int> <int>  <dbl> <dbl>   <dbl>    <dbl>    <dbl> <dbl> <dbl> <dbl>
#> 1         1     1  0.258 0.019    1        0.88     1.12   0    1     0.88
#> 2         2     2 -0.258 0.019    1.04     0.88     1.12   0.7  1.04  0.88
#> # ... with 3 more variables: ci_hi <dbl>, t <dbl>, section_index <chr>