# NOT RUN {
endp <- customvision_training_endpoint(url="endpoint_url", key="key")
myproj <- get_project(endp, "myproject")
mod <- get_model(myproj)
show_model(mod)
show_training_performance(mod)
summary(mod)
# }
Run the code above in your browser using DataLab