# NOT RUN {
financial <- dm_financial_sqlite()
financial %>%
pull_tbl(districts) %>%
dbplyr::remote_name()
# compute() copies the data to new tables:
financial %>%
compute() %>%
pull_tbl(districts) %>%
dbplyr::remote_name()
# collect() returns a local dm:
financial %>%
collect() %>%
pull_tbl(districts) %>%
class()
# }
Run the code above in your browser using DataLab