(r*p/(r*p+(1-r)*q))*p/((r*p/(r*p+(1-r)*q))*p+(1-(r*p/(r*p+(1-r)*q)))*q)