if (FALSE) {
library(dplyr)
deploymentId <- "59a5af20c80891534e3c2bde"
acc <- GetDeploymentAccuracy(deploymentId, end = ISOdate(2021, 01, 06, 1, 0, 0, tz = "UTC"))
df <- mutate(
acc$metrics,
"modelId" = acc$modelId,
"startTime" = acc$period$start,
"endTime" = acc$period$end,
.before = everything()
)
}
Run the code above in your browser using DataLab