added better tests to to the R multiple regression