View source: R/MultipleTables-method-exported.R
MultipleTables.summary | R Documentation |
MultipleTables
.Summarize the model of the class MultipleTables
fitted by MultipleTables.modelFit
.
MultipleTables.summary(
multiple_tables_object,
alpha = 0.05,
verbose = TRUE,
digit = 3,
control = list()
)
multiple_tables_object |
The object created by |
alpha |
a numeric value specifying the significant level. Default value sets to 0.05. |
verbose |
a logical value; if TRUE (default), the detailed summary messages will display. |
digit |
an integer value specifying how many decimal places to keep. Default value sets to 3. |
control |
a list can be specified to control the fitting process. |
A list with the following components: model, posterior mean & equal tail confidence interval of overall measure, estimated hyperparameters, the chi-square test statistics & the p-value of the likelihood ratio test, posterior means & the lower/upper bounds of the equal tail confidence intervals of study-specific measure.
MultipleTables.create
, MultipleTables.modelFit
, and MultipleTables.plot
.
library(mmeta)
library(ggplot2)
## Analyze the dataset colorectal to conduct exact inference of the odds ratios
data(colorectal)
colorectal['study_name'] <- colorectal['studynames']
## If exact method is used, the codes for sampling method are similar.
## Create object multiple_tables_obj_exact
multiple_tables_obj_exact <- MultipleTables.create(data=colorectal,
measure='OR', model= 'Sarmanov')
## Model fit default
multiple_tables_obj_exact <- MultipleTables.modelFit(multiple_tables_obj_exact, method = 'exact')
## Summary of the fitting process (default)
multiple_tables_obj_exact <- MultipleTables.summary(multiple_tables_obj_exact)
## Structure of SingleTable object
str(multiple_tables_obj_exact)
## If set alpha level to 0.1
multiple_tables_obj_exact <- MultipleTables.summary(multiple_tables_obj_exact, alpha = 0.1)
## If set digit to 4
multiple_tables_obj_exact <- MultipleTables.summary(multiple_tables_obj_exact,
alpha = 0.05, digit = 4)
## If decided not to print out
multiple_tables_obj_exact <- MultipleTables.summary(multiple_tables_obj_exact,
alpha = 0.05, digit = 4,verbose = FALSE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.