|
@ -13,6 +13,7 @@ sqlLastDrop<-function(conn, tablename, droplast=1,dbtype=NULL){ |
|
|
sqlSave(conn, table, tablename = tablename, safer = F)} |
|
|
sqlSave(conn, table, tablename = tablename, safer = F)} |
|
|
} |
|
|
} |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
sqlInitialize<-function(ruta="ruta_database.R"){ |
|
|
sqlInitialize<-function(ruta="ruta_database.R"){ |
|
|
library(tidyverse) |
|
|
library(tidyverse) |
|
|
library(RODBC) |
|
|
library(RODBC) |
|
|