library(RPostgreSQL)
drv <- dbDriver("PostgreSQL")
con <- dbConnect(drv, user="your_username", password="your_password", dbname="workshop");
lakes <- dbGetQuery(con,'SELECT * FROM lakes');