var_comps_binary function

Get variance components for binomial model with binary response.