# NOT RUN {
dataset <- UploadPredictionDataset(project, diamonds_small)
model <- ListModels(project)[[1]]
modelId <- model$modelId
predictJobId <- RequestPredictionsForDataset(project, modelId, dataset$id)
predictions <- GetPredictions(project, predictJobId)
# }
Run the code above in your browser using DataLab