Vamos a conectar R a nuestra BBDD PostgreSQL. Lo vamos a hacer vía ODBC con el paquete de R RODBC. [Inciso] Recordad que todo el trabajo lo estamos realizando bajo Windows. Además, trabajar con ODBC nos permitirá conectar nuestro PostgreSQL con Access o Excel. Aunque para este tipo de tarea recomiendo el uso del Data Integration de Pentaho.
El primer paso será descargarnos de esta dirección los controladores ODBC para PostgreSQL que se adecúen con nuestro sistema operativo y nuestra versión de la base de datos. Tras instalarlos, ya podemos ir a las Herramientas Administrativas > Orígenes de Datos ODBC e introducimos un nuevo DSN de sistema y de usuario:
Ya tenemos un origen de datos ODBC para nuestra BBDD de PostgreSQL llamado PostgreSQL30. Podemos crear la conexión con R:
library(RODBC)
# Establecemos la conexión
con <- odbcConnect("PostgreSQL30", case = "postgresql")
Ya tenemos conectado R con nuestra BBDD y podemos realizar consultas sobre ella:
# Realizamos una consulta
datos <- sqlQuery(con, "SELECT * FROM red_wine")
Seleccionamos todos los campos de la tabla red_wine que cargamos en el capítulo anterior del monográfico. También estamos en disposición de subir a nuestro PostgreSQL los objetos de R que deseemos:
# Creamos una muestra aleatoria de 100 registros
selec <- sample(1:nrow(datos), 100)
muestra <- datos[selec, ]
# Subimos a la BBDD PostgreSQL el data frame de R
sqlSave(con, muestra, tablename = "muestra_vinos", rownames = FALSE)
Vemos que la función sqlSave() nos permite guardar en la BBDD aquellos objetos de R que consideremos necesarios. En pocos pasos estamos construyendo herramientas para que nuestro equipo tenga un pequeño sistema de información. Este sistema se sustenta en tres pilares fundamentales: PostgreSQL, Data Integration de Pentaho y R. Software libre. Saludos.