Gets the .B_i (list of bread matrices) slot
grab_meat_list(object)
# S4 method for sandwich_components
grab_meat_list(object)
# S4 method for sandwich_components
grab_ee_list(object)
a sandwich_components
object
myee <- function(data){
function(theta){
c(data$Y1 - theta[1],
(data$Y1 - theta[1])^2 - theta[2])
}
}
results <- m_estimate(
estFUN = myee,
data = geexex,
root_control = setup_root_control(start = c(1,1)))
head(grab_meat_list(results@sandwich_components))
#> $`1`
#> [,1] [,2]
#> [1,] 1.894083 11.21258
#> [2,] 11.212579 66.37615
#>
#> $`2`
#> [,1] [,2]
#> [1,] 29.24529 103.8534
#> [2,] 103.85343 368.7956
#>
#> $`3`
#> [,1] [,2]
#> [1,] 3.690828 12.20011
#> [2,] 12.200110 40.32772
#>
#> $`4`
#> [,1] [,2]
#> [1,] 11.068524 3.417716
#> [2,] 3.417716 1.055315
#>
#> $`5`
#> [,1] [,2]
#> [1,] 34.5337 -143.9309
#> [2,] -143.9309 599.8807
#>
#> $`6`
#> [,1] [,2]
#> [1,] 2.708615 12.06794
#> [2,] 12.067937 53.76737
#>