Note: Working on an updated version, coming soon :)
# connect to client
library(delta.sharing)
client<- sharing_client("~/Desktop/config.share")
# see what data is accessibleclient$list_shares()
client$list_all_schemas()
client$list_schemas(share="deltasharingr")
client$list_tables(share="deltasharingr", schema="simple")
client$list_tables_in_share(share="deltasharingr")
# table classds_tbl<-client$table(share="deltasharingr", schema="simple", table="all_types")
# (optional) specify a limit (best effort to enforce)ds_tbl$set_limit(limit=1000)
ds_tbl$limit# (optional) where to download files (before arrow kicks in)ds_tbl$set_download_path("~/Desktop/share-download/")
# load data in as arrow::Dataset ds_tbl_arrow<-ds_tbl$load_as_arrow()
# if schema mapping is casuing problems, infer the schema# ds_tbl_arrow <- ds_tbl$load_as_arrow(infer_schema = TRUE)# do standard {dplyr} things if you like thatds_tbl_arrow %>%
select(1, 2) %>%
mutate(x=column1+column2) %>%
collect()
# just want a tibble? (alias for collect on arrow)ds_tbl_tibble<-ds_tbl$load_as_tibble()
# ds_tbl_tibble <- ds_tbl$load_as_tibble(infer_schema = TRUE)