# NOT RUN {
# comma-separated values --> data.frame or tibble
(chicken_csv <- drive_example_remote("chicken.csv"))
chicken_csv %>%
drive_read_string() %>%
read.csv(text = .)
# Google Doc --> character vector
(chicken_doc <- drive_example_remote("chicken_doc"))
chicken_doc %>%
# NOTE: we must specify an export MIME type
drive_read_string(type = "text/plain") %>%
strsplit(split = "(\r\n|\r|\n)") %>%
.[[1]]
# }
Run the code above in your browser using DataLab