ex.7b_brenda.r