if (FALSE) {
Sys.setenv(OPENAI_API_KEY = "sk-xxxxxx")
# Generate 2 variations of your logo
resp <- create_image_variation(
image = "logo.png",
n = 2,
size = "512x512"
)
cat(resp$data[[1]]$url)
cat(resp$data[[2]]$url)
}
Run the code above in your browser using DataLab