library(pool)
library(RPostgres)
library(DBI)
library(tidyverse)
library(dbplyr)
pool <- pool::dbPool(RPostgres::Postgres(), 
                     host = "biosensor.c9k2hfiwt5mi.us-east-2.rds.amazonaws.com",
                     dbname = "biosensor",
                     port = 5432,
                     user = "biosensor",
                     password = readLines("~/password.txt"))
dbListTables(pool)
cells <- tbl(pool, "cells")
cells %>% count(image_number) %>% arrange(image_number)


NiklasTR/dcp_helper documentation built on June 12, 2020, 10:22 p.m.