#' Función para consultar las tablas de la BD
#'
#' @param tabla nombre de la tabla que se desea consultar
#' @param con_pass cadena de conexion a la bade de datos
#'
#' @return devuelve la tabla seleccionada
#'
#' @examples
#' tabla_proyectos <- db_consultar_tabla()
#'
db_consultar_tabla<-function(tabla = "proyectos",con_pass = db_conexion()){
tabla_proyectos<-DBI::dbGetQuery(con_pass,paste0("SELECT * FROM ", tabla))
DBI::dbDisconnect(con_pass)
return(tabla_proyectos)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.