r语言 - 如何使用选择输入创建动态查询

Question

我正在尝试使用选择输入创建动态查询。

类似的东西

Select * from basket where fruits in("apple","banana","cherry")

我有一个名为fruit_list的表，它填充了我的选择输入框。

selectInput("fruit_list", label = h5("Select fruit"), multiple = T, 
choices = (dbGetQuery(conn, "SELECT fruit from fruit_list');"))) 

到目前为止，当我渲染打印我的选择时，我得到"苹果"香蕉"樱桃" 我需要元素之间的逗号来获得"苹果"，"香蕉"，"樱桃" 当我从多选框"苹果"中选择单个元素时

Select * from basket where fruits in("apple")

我的应用程序运行良好。但是，当我选择多个元素"苹果"香蕉"时，我收到一个错误：期望单个字符串值：[类型=字符;范围=2]。

Answer 1

paste('dbGetQuery(conn,"Select fruit from fruits;", collapse =', '))