update equations to r
update r equation to remove determination