How to integrate GPT-4 model hosted on Azure with the gptstudio package

题意：怎样将托管在Azure上的GPT-4模型与gptstudio包集成？

问题背景：

I am looking to integrate the OpenAI GPT-4 model into my application. Here are the details I have:

• Endpoint: https://xxxxxxxxxxxxxxx.openai.azure.com/
• Location/Region: yyyyyyyyyyyyyyyyyyyyyyyy
• Key: *******************
• Deployment Name: gpt-4o
• Model Name: gpt-4o
• Model Version: 2024-02-01

  I edited the .Renviron file accordingly:

  AZURE_OPENAI_TASK="completions"
  AZURE_OPENAI_ENDPOINT="https://xxxxxxxxxxxxxxx.openai.azure.com/"
  AZURE_OPENAI_DEPLOYMENT_NAME="gpt-4o"
  AZURE_OPENAI_KEY="*******************"
  AZURE_OPENAI_API_VERSION="2024-02-01"
  AZURE_OPENAI_USE_TOKEN=FALSE

  I want to integrate it with gptstudio. Could someone guide me on authenticating and making API requests to this endpoint?

  I tried:

  library(gptstudio)
  chat(service = "azure_openai", prompt = "hello", model = "gpt-4)
  #> $messages
  #> $messages[[1]]
  #> $messages[[1]]$role
  #> [1] "system"
  #> 
  #> $messages[[1]]$content
  #> As a chat bot assisting an R programmer working in the RStudio IDE it is important to tailor responses to their skill level and preferred coding style. They consider themselves to be a beginner R programmer. Provide answers with their skill level in mind.  
  #> 
  #> 
  #> $messages[[2]]
  #> $messages[[2]]$role
  #> [1] "user"
  #> 
  #> $messages[[2]]$content
  #> [1] "hello"
  #> Error in `query_api_azure_openai()`:
  #> ✖ Azure OpenAI API request failed. Error 400 - Bad Request
  #> ℹ Visit the Azure OpenAi Error code guidance
  #>   () for
  #>   more details
  #> ℹ You can also visit the API documentation
  #>   ()

  问题解决：

  Below is the sample code to authenticate an Azure Openai GPT-4o model with a key in R using httr and jsonlite packages.

  Code :

  library(httr)
  library(jsonlite)
  azure_endpoint