## 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)
# ## End(Not run)
Run the code above in your browser using DataLab