## Not run:
# remote_base <- "http://127.0.0.1:5000"
# client <- create_GymClient(remote_base)
# route <- "/v1/envs/"
# env_id <- "CartPole-v0"
# data <- list(env_id = env_id)
# post_request(client, route, data)
# ## End(Not run)
Run the code above in your browser using DataLab