least square regression in r