How To Do Odds Ratio In R