Agresti_equation_1 function

First equation in section 3. Solved for kappa.