# NOT RUN {
workspace_id <- "" # Your AzureML workspace id
authorization_token <- "" # Your AsureML authorization token
ws <- workspace(
id = workspace_id,
auth = authorization_token
)
s <- services(ws)
endpoints(ws, s$Id[1])
# Note that you can alternatively just use the entire row that
# describes the service.
endpoints(ws, s[1,])
# Equivalent:
getEndpoints(ws, s$Id[1])
# }
Run the code above in your browser using DataLab