无法基于另一列R Shiny在dataframe中创建新列

在R Shiny中，要基于另一列在dataframe中创建新列，可以使用以下步骤：

首先，确保你已经在Shiny应用程序中加载了所需的包，例如shiny和dplyr。
在Shiny应用程序的server函数中，创建一个触发器，当数据发生变化时执行相应的操作。可以使用observeEvent函数来实现这一点。
在触发器内部，使用mutate函数来创建新列。mutate函数可以接受一个或多个列作为输入，并返回一个包含新列的数据框。

下面是一个示例代码，演示如何基于另一列在dataframe中创建新列：

library(shiny)
library(dplyr)

ui <- fluidPage(
  # UI组件
)

server <- function(input, output, session) {
  # 读取数据
  data <- reactive({
    # 从文件或其他数据源中读取数据，并返回一个数据框
  })
  
  # 创建触发器
  observeEvent(data(), {
    # 在数据发生变化时执行以下操作
    
    # 创建新列
    data <- data() %>%
      mutate(new_column = old_column * 2)  # 假设要将old_column的值乘以2赋给新列new_column
    
    # 更新数据
    # 可以选择将更新后的数据存储在一个新的reactive对象中，以便在其他地方使用
    # 例如：updated_data <- reactive({ data })
  })
  
  # 其他逻辑和输出
}

shinyApp(ui, server)

在上述示例中，我们使用了mutate函数来创建一个名为new_column的新列，该列的值是old_column列的两倍。你可以根据实际需求修改这个操作。

请注意，这只是一个示例代码，你需要根据你的具体情况进行适当的修改和调整。此外，还可以根据需要添加其他逻辑和输出。