R/print.OR.r

Defines functions print.OR

Documented in print.OR

print.OR <- function(x, ...){



es <- format(x$res, digits = 3, trim=TRUE)

cat("\nOdds ratio with ",(1-x$prob.lev)*100,"% interval:\n\n",sep="")

cat(es[2]," (",es[1],",",es[3],")\n\n",sep="")




invisible(x)

}

Try the GJRM package in your browser

Any scripts or data that you put into this service are public.

GJRM documentation built on June 24, 2025, 1:07 a.m.