# NOT RUN {
if (bq_testable()) {
jobs <- bq_project_jobs(bq_test_project())
jobs[[1]]
# Show statistics about job
bq_job_show_statistics(jobs[[1]])
# Wait for job to complete
bq_job_wait(jobs[[1]])
}
# }
Run the code above in your browser using DataLab