updated norm_to_binom3.R