From f0d7f9b83fba066df188269836c5b1be16f4dd3b Mon Sep 17 00:00:00 2001 From: sapttrs Date: Wed, 8 Jan 2025 17:33:27 -0400 Subject: [PATCH] Update get_response.R enable the user to choose a different model (was previously hardcoded i think) --- R/get_response.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/get_response.R b/R/get_response.R index 4bc1c14..27ae767 100644 --- a/R/get_response.R +++ b/R/get_response.R @@ -39,7 +39,7 @@ get_response = function(user_input = "what is a p-value in statistics?", "Content-Type" = "application/json" ) - data = paste0('{"model": "gpt-3.5-turbo", "messages": [ + data = paste0('{"model": "', model, '", "messages": [ {"role": "system", "content": "', system_specification, '"}, {"role": "user", "content": "', user_input, '"} ]}')