# NOT RUN {
if (bq_testable()) {
ds <- bq_test_dataset()
bq_mtcars <- bq_table_upload(bq_table(ds, "mtcars"), mtcars)
# dataset and table will be automatically deleted when ds is GC'd
}
# }
Run the code above in your browser using DataCamp Workspace