R-Studio - Connexion à Teradata ne fonctionne pas

J'ai la question lorsque j'essaie de connecter mon R-Studio à Teradata. Ça me donne

ERREUR: NANODBC / NANODBC.CPP: 983: 08001: [TERADATA] [DLL WSOCK32] (439) WSA E HostuNReach: Le serveur Teradata n'est pas accessible sur ce réseau code > p>

Cependant, j'ai pu me connecter à Teradata à partir de cmd. p>

Mon code utilise DBI Connection avec des paramètres standard. P>

readRenviron("~/.Renviron")

databaseType <- "Teradata"
defaultDatabase <- "Test"

SERVER <- "tera2"
DATABASE <- "teradb"


driverList <- odbc::odbcListDrivers()
DRIVER <- as.character(subset(driverList, grepl(databaseType, driverList$name, ignore.case = TRUE))$name[1])
driverList <- odbc::odbcListDrivers()
DRIVER <- as.character(subset(driverList, grepl(databaseType, driverList$name, ignore.case = TRUE))$name[1])

queryData <- function(query) {

  con <- openConnection()

  queryDataRet <- data.frame(dbGetQuery(con, query))

  dbDisconnect(con)

  return(queryDataRet)

}


openConnection <- function() {

  con <- dbConnect(odbc::odbc(), 
                   Driver = DRIVER,
                   Server = SERVER,
                   DBCName = DATABASE,
                   UID = Sys.getenv("tera_user"), 
                   PWD = Sys.getenv("tera_pass"))

  #Note: passwords are stored in .Renviron

  return(con)
}


testQuery <- function(){

  query <- paste0 ("select * from test")

  print(queryData(query))

}

testQuery()