if (FALSE) {
Sys.setenv(OPENAI_API_KEY = "sk-xxxxxx")
resp <- create_image_edit(
image = "photo.png",
prompt = "Add a mountain range in the background",
mask = "sky_mask.png"
)
cat(resp$data[[1]]$url)
}
Run the code above in your browser using DataLab