# Use dplyr verbs on a table in a DBI database
cnt <- connector_dbi(RSQLite::SQLite())
iris_cnt <- cnt |>
write_cnt(iris, "iris") |>
tbl_cnt("iris")
iris_cnt
iris_cnt |>
dplyr::collect()
iris_cnt |>
dplyr::group_by(Species) |>
dplyr::summarise(
n = dplyr::n(),
mean.Sepal.Length = mean(Sepal.Length, na.rm = TRUE)
) |>
dplyr::collect()
# Use dplyr verbs on a table
folder <- withr::local_tempdir()
cnt <- connector_fs(folder)
cnt |>
write_cnt(iris, "iris.csv")
iris_cnt <- cnt |>
tbl_cnt("iris.csv")
iris_cnt
iris_cnt |>
dplyr::group_by(Species) |>
dplyr::summarise(
n = dplyr::n(),
mean.Sepal.Length = mean(Sepal.Length, na.rm = TRUE)
)
Run the code above in your browser using DataLab