Gets the .B (meat matrix) slot
grab_meat(object)
# S4 method for sandwich_components
grab_meat(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)))
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
#>
#> $`7`
#> [,1] [,2]
#> [1,] 9.9239647 0.36944079
#> [2,] 0.3694408 0.01375322
#>
#> $`8`
#> [,1] [,2]
#> [1,] 2.315721 11.75630
#> [2,] 11.756302 59.68362
#>
#> $`9`
#> [,1] [,2]
#> [1,] 24.16551 69.43268
#> [2,] 69.43268 199.49496
#>
#> $`10`
#> [,1] [,2]
#> [1,] 0.2249591 4.655848
#> [2,] 4.6558475 96.359348
#>
#> $`11`
#> [,1] [,2]
#> [1,] 0.4170714 -6.21539
#> [2,] -6.2153901 92.62460
#>
#> $`12`
#> [,1] [,2]
#> [1,] 0.9483677 -8.855017
#> [2,] -8.8550173 82.680306
#>
#> $`13`
#> [,1] [,2]
#> [1,] 6.263501 9.454541
#> [2,] 9.454541 14.271306
#>
#> $`14`
#> [,1] [,2]
#> [1,] 33.1940 -133.3929
#> [2,] -133.3929 536.0505
#>
#> $`15`
#> [,1] [,2]
#> [1,] 1.872697 11.17836
#> [2,] 11.178365 66.72508
#>
#> $`16`
#> [,1] [,2]
#> [1,] 0.2199431 -4.60600
#> [2,] -4.6060002 96.45785
#>
#> $`17`
#> [,1] [,2]
#> [1,] 16.22411 24.90410
#> [2,] 24.90410 38.22792
#>
#> $`18`
#> [,1] [,2]
#> [1,] 1.138186 9.498294
#> [2,] 9.498294 79.264346
#>
#> $`19`
#> [,1] [,2]
#> [1,] 1.574341 10.62365
#> [2,] 10.623649 71.68836
#>
#> $`20`
#> [,1] [,2]
#> [1,] 41.16761 199.7130
#> [2,] 199.71303 968.8513
#>
#> $`21`
#> [,1] [,2]
#> [1,] 9.8559376 0.58173782
#> [2,] 0.5817378 0.03433655
#>
#> $`22`
#> [,1] [,2]
#> [1,] 2.727275 -12.07862
#> [2,] -12.078619 53.49407
#>
#> $`23`
#> [,1] [,2]
#> [1,] 5.666072 10.41443
#> [2,] 10.414434 19.14208
#>
#> $`24`
#> [,1] [,2]
#> [1,] 2.610097 -12.00560
#> [2,] -12.005600 55.22187
#>
#> $`25`
#> [,1] [,2]
#> [1,] 38.75822 -178.7807
#> [2,] -178.78072 824.6650
#>
#> $`26`
#> [,1] [,2]
#> [1,] 4.49254 11.76081
#> [2,] 11.76081 30.78805
#>
#> $`27`
#> [,1] [,2]
#> [1,] 1.354266 10.10929
#> [2,] 10.109287 75.46349
#>
#> $`28`
#> [,1] [,2]
#> [1,] 15.88235 23.27837
#> [2,] 23.27837 34.11854
#>
#> $`29`
#> [,1] [,2]
#> [1,] 3.697326 12.19835
#> [2,] 12.198350 40.24523
#>
#> $`30`
#> [,1] [,2]
#> [1,] 1.315666 -10.00845
#> [2,] -10.008449 76.13562
#>
#> $`31`
#> [,1] [,2]
#> [1,] 2.943767 12.17742
#> [2,] 12.177423 50.37410
#>
#> $`32`
#> [,1] [,2]
#> [1,] 11.875512 -6.321063
#> [2,] -6.321063 3.364557
#>
#> $`33`
#> [,1] [,2]
#> [1,] 7.352891 -7.289782
#> [2,] -7.289782 7.227215
#>
#> $`34`
#> [,1] [,2]
#> [1,] 3.554538 12.22969
#> [2,] 12.229690 42.07729
#>
#> $`35`
#> [,1] [,2]
#> [1,] 28.60297 99.27135
#> [2,] 99.27135 344.53775
#>
#> $`36`
#> [,1] [,2]
#> [1,] 2.985024 -12.19118
#> [2,] -12.191179 49.79017
#>
#> $`37`
#> [,1] [,2]
#> [1,] 0.4202515 6.236979
#> [2,] 6.2369792 92.563397
#>
#> $`38`
#> [,1] [,2]
#> [1,] 3.159976 -12.23235
#> [2,] -12.232354 47.35178
#>
#> $`39`
#> [,1] [,2]
#> [1,] 0.04209968 2.051644
#> [2,] 2.05164409 99.982784
#>
#> $`40`
#> [,1] [,2]
#> [1,] 3.168118 -12.23361
#> [2,] -12.233611 47.23979
#>
#> $`41`
#> [,1] [,2]
#> [1,] 2.816568 12.12490
#> [2,] 12.124901 52.19587
#>
#> $`42`
#> [,1] [,2]
#> [1,] 73.79736 -547.6994
#> [2,] -547.69940 4064.8425
#>
#> $`43`
#> [,1] [,2]
#> [1,] 0.3395676 -5.65340
#> [2,] -5.6533998 94.12242
#>
#> $`44`
#> [,1] [,2]
#> [1,] 6.737307 -8.575793
#> [2,] -8.575793 10.915967
#>
#> $`45`
#> [,1] [,2]
#> [1,] 15.77600 -22.77789
#> [2,] -22.77789 32.88746
#>
#> $`46`
#> [,1] [,2]
#> [1,] 20.24224 -45.89573
#> [2,] -45.89573 104.06051
#>
#> $`47`
#> [,1] [,2]
#> [1,] 3.218271 12.24009
#> [2,] 12.240091 46.55289
#>
#> $`48`
#> [,1] [,2]
#> [1,] 4.447916 11.79636
#> [2,] 11.796364 31.28526
#>
#> $`49`
#> [,1] [,2]
#> [1,] 2.661533 -12.03940
#> [2,] -12.039404 54.46006
#>
#> $`50`
#> [,1] [,2]
#> [1,] 0.2421215 -4.821738
#> [2,] -4.8217380 96.022702
#>
#> $`51`
#> [,1] [,2]
#> [1,] 16.76233 27.51737
#> [2,] 27.51737 45.17307
#>
#> $`52`
#> [,1] [,2]
#> [1,] 43.15767 217.5567
#> [2,] 217.55671 1096.6978
#>
#> $`53`
#> [,1] [,2]
#> [1,] 0.01353747 1.166729
#> [2,] 1.16672924 100.554795
#>
#> $`54`
#> [,1] [,2]
#> [1,] 0.01998735 1.416771
#> [2,] 1.41677076 100.425482
#>
#> $`55`
#> [,1] [,2]
#> [1,] 0.9147474 -8.728798
#> [2,] -8.7287978 83.292847
#>
#> $`56`
#> [,1] [,2]
#> [1,] 1.94062 11.28466
#> [2,] 11.28466 65.62002
#>
#> $`57`
#> [,1] [,2]
#> [1,] 0.2479823 4.876828
#> [2,] 4.8768280 95.907875
#>
#> $`58`
#> [,1] [,2]
#> [1,] 0.1936836 4.33386
#> [2,] 4.3338599 96.97434
#>
#> $`59`
#> [,1] [,2]
#> [1,] 1.023707 -9.123794
#> [2,] -9.123794 81.315885
#>
#> $`60`
#> [,1] [,2]
#> [1,] 0.2615007 -5.001078
#> [2,] -5.0010784 95.643278
#>
#> $`61`
#> [,1] [,2]
#> [1,] 1.027469 9.13673
#> [2,] 9.136730 81.24805
#>
#> $`62`
#> [,1] [,2]
#> [1,] 0.03669607 -1.916492
#> [2,] -1.91649203 100.090877
#>
#> $`63`
#> [,1] [,2]
#> [1,] 0.5679896 7.139522
#> [2,] 7.1395221 89.742452
#>
#> $`64`
#> [,1] [,2]
#> [1,] 9.8229447 -0.68416849
#> [2,] -0.6841685 0.04765236
#>
#> $`65`
#> [,1] [,2]
#> [1,] 0.0003101896 0.1768428
#> [2,] 0.1768428421 100.8202487
#>
#> $`66`
#> [,1] [,2]
#> [1,] 6.572683 8.892421
#> [2,] 8.892421 12.030877
#>
#> $`67`
#> [,1] [,2]
#> [1,] 1.112018 9.416064
#> [2,] 9.416064 79.730991
#>
#> $`68`
#> [,1] [,2]
#> [1,] 7.875050 6.078871
#> [2,] 6.078871 4.692373
#>
#> $`69`
#> [,1] [,2]
#> [1,] 0.5861514 -7.238864
#> [2,] -7.2388645 89.398679
#>
#> $`70`
#> [,1] [,2]
#> [1,] 11.16203 3.744520
#> [2,] 3.74452 1.256172
#>
#> $`71`
#> [,1] [,2]
#> [1,] 6.168929 -9.617783
#> [2,] -9.617783 14.994783
#>
#> $`72`
#> [,1] [,2]
#> [1,] 0.5792591 -7.201425
#> [2,] -7.2014253 89.529060
#>
#> $`73`
#> [,1] [,2]
#> [1,] 0.167155 4.036979
#> [2,] 4.036979 97.497532
#>
#> $`74`
#> [,1] [,2]
#> [1,] 1.239600 -9.799509
#> [2,] -9.799509 77.468851
#>
#> $`75`
#> [,1] [,2]
#> [1,] 0.06932852 2.625635
#> [2,] 2.62563494 99.438996
#>
#> $`76`
#> [,1] [,2]
#> [1,] 67.43633 -471.3264
#> [2,] -471.32637 3294.1968
#>
#> $`77`
#> [,1] [,2]
#> [1,] 1.929081 -11.26709
#> [2,] -11.267086 65.80710
#>
#> $`78`
#> [,1] [,2]
#> [1,] 2.356123 11.79640
#> [2,] 11.796397 59.06101
#>
#> $`79`
#> [,1] [,2]
#> [1,] 25.28754 76.66866
#> [2,] 76.66866 232.44977
#>
#> $`80`
#> [,1] [,2]
#> [1,] 74.4741 556.0452
#> [2,] 556.0452 4151.5939
#>
#> $`81`
#> [,1] [,2]
#> [1,] 25.03456 -75.0184
#> [2,] -75.01840 224.7997
#>
#> $`82`
#> [,1] [,2]
#> [1,] 5.358911 -10.83927
#> [2,] -10.839271 21.92419
#>
#> $`83`
#> [,1] [,2]
#> [1,] 0.2038647 -4.44171
#> [2,] -4.4417103 96.77393
#>
#> $`84`
#> [,1] [,2]
#> [1,] 4.577009 11.69014
#> [2,] 11.690144 29.85781
#>
#> $`85`
#> [,1] [,2]
#> [1,] 5.935795 -10.00229
#> [2,] -10.002293 16.85467
#>
#> $`86`
#> [,1] [,2]
#> [1,] 7.774745 -6.319717
#> [2,] -6.319717 5.136994
#>
#> $`87`
#> [,1] [,2]
#> [1,] 0.1741867 4.118081
#> [2,] 4.1180809 97.358719
#>
#> $`88`
#> [,1] [,2]
#> [1,] 1.501483 10.46419
#> [2,] 10.464191 72.92743
#>
#> $`89`
#> [,1] [,2]
#> [1,] 19.2530 -40.41960
#> [2,] -40.4196 84.85658
#>
#> $`90`
#> [,1] [,2]
#> [1,] 6.471038 9.08196
#> [2,] 9.081960 12.74633
#>
#> $`91`
#> [,1] [,2]
#> [1,] 0.9537271 8.874769
#> [2,] 8.8747688 82.582870
#>
#> $`92`
#> [,1] [,2]
#> [1,] 1.097949 9.371054
#> [2,] 9.371054 79.982427
#>
#> $`93`
#> [,1] [,2]
#> [1,] 14.22058 15.76036
#> [2,] 15.76036 17.46687
#>
#> $`94`
#> [,1] [,2]
#> [1,] 1.228669 9.768323
#> [2,] 9.768323 77.661390
#>
#> $`95`
#> [,1] [,2]
#> [1,] 56.79944 352.3951
#> [2,] 352.39509 2186.3295
#>
#> $`96`
#> [,1] [,2]
#> [1,] 3.113554 12.22408
#> [2,] 12.224084 47.99281
#>
#> $`97`
#> [,1] [,2]
#> [1,] 39.15787 182.2009
#> [2,] 182.20092 847.7780
#>
#> $`98`
#> [,1] [,2]
#> [1,] 0.363852 -5.837414
#> [2,] -5.837414 93.651817
#>
#> $`99`
#> [,1] [,2]
#> [1,] 19.24029 -40.35047
#> [2,] -40.35047 84.62246
#>
#> $`100`
#> [,1] [,2]
#> [1,] 5.12201 -11.13313
#> [2,] -11.13313 24.19881
#>