if (FALSE) {
Sys.setenv(OPENAI_API_KEY = "sk-xxxxxx")
vs <- create_vector_store(
name = "Economics Literature",
file_ids = list("file-abc123", "file-def456")
)
cat("Vector Store ID:", vs$id)
}
Run the code above in your browser using DataLab