# NOT RUN {
projectId <- "59a5af20c80891534e3c2bde"
modelId <- "5996f820af07fc605e81ead4"
datasets <- ListPredictionDatasets(projectId)
dataset <- datasets[[1]]
datasetId <- dataset$id
model <- GetModel(model, datasetId)
jobId <- RequestReasonCodes(model, datasetId)
reasonCodeId <- GetReasonCodesMetadataFromJobId(projectId, jobId)
GetReasonCodesMetadata(projectId, reasonCodeId)
# }
Run the code above in your browser using DataLab