Imprima tabelas "bonitas" para modelos h2o em R
Existem vários pacotes paraR
que ajudam a imprimir tabelas "bonitas" (LaTeX / HTML / TEXT) a partir da saída de modelos estatísticos E a comparar facilmente os resultados de especificações de modelos alternativos.
Alguns desses pacotes sãoapsrtable
, xtable
, memisc
, texreg
, outreg
estargazer
(para exemplos, veja aqui:https://www.r-statistics.com/2013/01/stargazer-package-for-beautiful-latex-tables-from-r-statistical-models-output/)
Existe algum comparávelR
pacote que suporta os modelos doh2o
pacote?
Aqui está um exemplo de dois modelos GLM simples comh2o
que eu gosto de imprimir um ao lado do outro como tabelas "bonitas".
# Load package and setup h2o
library(h2o)
localH2O <- h2o.init(ip = 'localhost', port = 54321, max_mem_size = '4g')
# Load data
prostatePath <- system.file("extdata", "prostate.csv", package = "h2o")
prostate.hex <- h2o.importFile(path = prostatePath, destination_frame = "prostate.hex")
# Run GLMs
model.output.1 <- h2o.glm(y = "CAPSULE", x = c("RACE","PSA","DCAPS"),
training_frame = prostate.hex,family = "binomial", nfolds = 0,
alpha = 0.5, lambda_search = FALSE)
model.output.2 <- h2o.glm(y = "CAPSULE", x = c("AGE","RACE","PSA","DCAPS"),
training_frame = prostate.hex, family = "binomial", nfolds = 0,
alpha = 0.5, lambda_search = FALSE)
É assim que seria com um objeto GLM comum usandoscreenreg()
detexreg
pacote:
library(data.table)
library(texreg)
d <- fread(prostatePath)
model.output.1.glm <- glm(CAPSULE ~ RACE + PSA + DCAPS, data=d)
model.output.2.glm <- glm(CAPSULE ~ AGE + RACE + PSA + DCAPS, data=d)
screenreg(list(model.output.1.glm, model.output.2.glm))