Adding r2_mlm() and possible update to r2() to work with it (#764)

Adding r2_mlm() and possible update to r2() to work with it (#764) #939