# NOT RUN {
## Upload file to check publication status
file <- drive_upload(R.home('doc/BioC_mirrors.csv'),
type = "spreadsheet")
## Check publication status
drive_is_published(file)
## Publish file
drive_publish(file)
## Check publication status agian
drive_is_published(file)
## Unpublish file
drive_unpublish(file)
## Clean up
drive_rm(file)
# }
Run the code above in your browser using DataLab