# NOT RUN {
Sys.setenv(OPENCAST_HOST = "https://legacy.opencast.org")
Sys.setenv(OPENCAST_USERNAME = "admin")
Sys.setenv(OPENCAST_PASSWORD = "opencast")
agents <- oc_list_agents()
oc_agent(agents$content$agent_id)
# }
Run the code above in your browser using DataLab