101 API key management: read from environment variable

api_key <- Sys.getenv(“OPENAI_API_KEY”) if (api_key == ““) stop(”OPENAI_API_KEY not set in the environment.”)