R/db_conexion.R

In pelishk/upax_library: Librería de análisis

#' Abre la conexión con la base de datos, no requiere parametros.
#'
#' @return devuelve la conexion en un objeto de r
#'
#' @examples
#' con_pass <- conexion()
#'

db_conexion<-function(dbname = 'procesamiento'){
  con_pass <- DBI::dbConnect(RMariaDB::MariaDB(),
                             host = 'researchprecios.cg9hlq4ugyim.us-east-1.rds.amazonaws.com',
                             port = 3306,
                             dbname = dbname,
                             user = 'procesamiento',
                             password = 'r()Mp3(()mpuS')
  
  return(con_pass)
}