Make gee results from "geeglm" object
geeglm.display(geeglm.obj, decimal = 2)
geeglm.obj | "geeglm" object |
---|---|
decimal | Decimal, Default: 2 |
List: caption, main table, metrics table
DETAILS
library(geepack) data(dietox) dietox$Cu <- as.factor(dietox$Cu) gee01 <- geeglm(Weight ~ Time + Cu, id = Pig, data = dietox, family = gaussian, corstr = "ex" ) geeglm.display(gee01)#> $caption #> [1] "GEE(gaussian) predicting Weight by Time, Cu - Group Pig" #> #> $table #> crude coeff(95%CI) crude P value adj. coeff(95%CI) #> Time "6.94 (6.79,7.1)" "< 0.001" "6.94 (6.79,7.1)" #> Cu: ref.=Cu000 NA NA NA #> 035 "-0.59 (-3.73,2.54)" "0.711" "-0.84 (-3.9,2.23)" #> 175 "1.9 (-1.87,5.66)" "0.324" "1.77 (-1.9,5.45)" #> adj. P value #> Time "< 0.001" #> Cu: ref.=Cu000 NA #> 035 "0.593" #> 175 "0.345" #> #> $metric #> crude coeff(95%CI) crude P value #> NA NA #> Estimated correlation parameters "0.775" NA #> No. of clusters "72" NA #> No. of observations "861" NA #> adj. coeff(95%CI) adj. P value #> NA NA #> Estimated correlation parameters NA NA #> No. of clusters NA NA #> No. of observations NA NA #>