LR_CI_1x2(singh_2010["1st", "X"], singh_2010["1st", "n"])
LR_CI_1x2(singh_2010["2nd", "X"], singh_2010["2nd", "n"])
LR_CI_1x2(singh_2010["3rd", "X"], singh_2010["3rd", "n"])
with(singh_2010["4th", ], LR_CI_1x2(X, n)) # alternative syntax
LR_CI_1x2(ligarden_2010["X"], ligarden_2010["n"])
Run the code above in your browser using DataLab