Импорт таблиц с SQL сервера в R

Question

Я пытаюсь импортировать таблицы из SQL Server 2017 в R. Итак, я записал эти коды. Связь вроде в порядке. Но когда я импортирую таблицы, я получаю сообщение об ошибке, как показано ниже. Я могу решить эту проблему, написав sqlQuery или dbGetQuery в R, но я хотел бы понять, что проблема с dbReadTable. Наконец, я прошу вас помочь мне составить список таблиц в конкретной схеме в R.

install.packages("RODBC")
library(DBI)
library(RODBC)
install.packages("odbc")
library(odbc)

# Making proper conection.
con <- DBI::dbConnect(odbc::odbc(),
                      Driver   = "SQL Server",
                      Server   = "WINDOWS-M6QDHVB\\SQLEXPRESS",
                      Database = "AdventureWorks2017",
                      Trusted_Connection = "True")
#Import data wihtin the table into R.            
dbReadTable(con, SQL("HumanResources.Department"))
dbReadTable(con, SQL("HumanResources.Employee"))

Warning message:
In dbClearResult(rs) : Result already cleared

Error in result_fetch(res@ptr, n) : 
  nanodbc/nanodbc.cpp:3186: 07009: [Microsoft][ODBC SQL Server Driver]Invalid Descriptor Index