Shiny 返回数据编辑表？

我使用DTEdit允许用户在我闪亮的应用程序中编辑数据表。它运行良好，并在UI中显示用户的更新/插入。但是，我希望能够在更新的表上执行函数。有没有办法将更新后的表返回到服务器端和UI端？

dtedit

处理用户数据编辑的主要方法是使用和定义回调

但是，

dtedit

确实返回一个

reactiveValues

。在服务器端，可以在

observeEvent

中检测到“反应值”的更改

我有使用

reactiveValues的返回列表和基于。以前我的
DTedit
版本返回“reactive”列表，而不是“reactiveValues”，但现在返回
reactiveValues
，就像这样

使用：

服务器您好，如果您提供
server <- function(input, output) {
    
    Grocery_List_Results <- dtedit(
        input, output,
        name = 'Grocery_List',
        thedata = data.frame(
            Buy = c('Tea', 'Biscuits', 'Apples'),
            Quantity = c(7, 2, 5),
            stringsAsFactors = FALSE
        )
    )
    
    observeEvent(Grocery_List_Results$thedata, {
        message(Grocery_List_Results$thedata)
    })
    
}

ui <- fluidPage(
    h3('Grocery List'),
    uiOutput('Grocery_List')
)

shinyApp(ui = ui, server = server)