ORGetter: Retreive Odds Ratio Table from Logistic GLM Objects
In cole-brokamp/CB: CB

This function returns a data.frame of the odds ratios and their 95% confidence intervals.

1 2	ORGetter(logistic.glm, digits = 2, sig.star = TRUE, show.intercept = FALSE)

`logistic.glm`	A logistic GLM R object. If not an object of 'glm' and 'lm', it will stop with an error.
`digits`	Number of digits to round table
`sig.star`	Will return an extra column with a star if the confidence interval does not contain 1. Defaults to TRUE.
`show.intercept`	Will show the intercept and its confidence interval only if set to TRUE. Defaults to FALSE.

## Not run:  x1 <- rnorm(100)
x2 <- rnorm(100)
y <- rbinom(100,1,prob=0.3)
logistic.model <- glm(y ~ x1 + x2,family='binomial')
ORGetter(logistic.model)

## End(Not run)