# NOT RUN {
workspace_id <- ""          # Your AzureML workspace id
authorization_token <- ""   # Your AzureML authorization token
ws <- workspace(
  id = workspace_id,
  auth = authorization_token
)
# Equivalent:
services(ws)
getWebServices(ws)
# }
Run the code above in your browser using DataLab