# NOT RUN {
# Create a file to publish
file <- drive_example_remote("chicken_sheet") %>%
drive_cp()
# Publish file
file <- drive_publish(file)
file$published
# Unpublish file
file <- drive_unpublish(file)
file$published
# Clean up
drive_rm(file)
# }
Run the code above in your browser using DataLab