feat(r/sedonadb): Implement dplyr::select() for sedonadb_dataframe

feat(r/sedonadb): Implement dplyr::select() for sedonadb_dataframe #1259