if (FALSE) {
cognitive_endpoint("https://myvisionservice.api.cognitive.azure.com",
service_type="Computervision", key="key")
cognitive_endpoint("https://mylangservice.api.cognitive.azure.com",
service_type="LUIS", key="key")
# authenticating with AAD
token <- AzureAuth::get_azure_token("https://cognitiveservices.azure.com",
tenant="mytenant", app="app_id", password="password")
cognitive_endpoint("https://myvisionservice.api.cognitive.azure.com",
service_type="Computervision", aad_token=token)
}
Run the code above in your browser using DataLab