app:
library(shiny)
library(bslib)
library(querychat)
querychat_config <- querychat_init(mtcars)
ui <- page_sidebar(
sidebar = querychat_sidebar("chat"),
DT::DTOutput("dt")
)
server <- function(input, output, session) {
querychat <- querychat_server("chat", querychat_config)
output$dt <- DT::renderDT({
DT::datatable(querychat$df())
})
}
shinyApp(ui, server)
Steps to reproduce
Launch the Shiny app with the code above
Ask a first question to the chatbot (e.g., "Show cars with mpg > 20")
The chatbot responds correctly
Ask a second question
The chatbot does not respond
Additional behavior
Attempt to access querychat$sql() to see the generated query doesn't work
No error messages visible in the user interface
packageVersion("querychat")
[1] ‘0.0.0.9000’
packageVersion("shiny")
[1] ‘1.10.0’
packageVersion("bslib")
[1] ‘0.9.0’
R.version.string
[1] "R version 4.4.3 (2025-02-28 ucrt)"
Sys.info()[c("sysname", "release", "version")]
sysname release version
"Windows" "10 x64" "build 22631"

app:
Steps to reproduce
Launch the Shiny app with the code above
Ask a first question to the chatbot (e.g., "Show cars with mpg > 20")
The chatbot responds correctly
Ask a second question
The chatbot does not respond
Additional behavior
Attempt to access querychat$sql() to see the generated query doesn't work
No error messages visible in the user interface