if (FALSE) {
question <- dialog_df("hi")
res_content <- chat_request(
messages = question,
model = "gpt-3.5-turbo"
)
if (!is_error(res_content)) {
answer <- chat_fetch_messages(res_content)
conversation <- merge_dialog_df(question, answer)
print(conversation)
}
}
Run the code above in your browser using DataLab