## Not run:
# dataset <- UploadPredictionDataset(project, diamonds_small)
# model <- GetAllModels(project)[[1]]
# modelId <- model$modelId
# predictJobId <- RequestPredictionsForDataset(project, modelId, ds$id)
# predictions <- GetPredictions(project, predictJobId)
# ## End(Not run)
Run the code above in your browser using DataLab