Sql Query Count Rows In R