R Select Last Row In Sql