datatable editable column

[EconomiCurtis]

The discussion continues on this thread

cell edit should reflect in other column

library(shiny) library(tidyverse) library(DT) some_data <- data.frame(e=1:8) ui <- DTOutput('tbl') server <- function(input, output, session) { some_reactive <- reactive(some_data) modified_reactive <- reactive({ mutate(some_reactive(), f=if_else(e<4,"yes","no")) }) output$tbl <- renderDT( modified_reactive() ) } shinyApp(ui, server) can you help with this ? observeEvent(input$modified_reactive_cell_edit, { f=if_else(e>100,"yes","no") }) i tried this also