如何使用反应函数更改rshiny中的列名

问题描述

我正在上传一个csv文件，并且为了标准化代码，我想更改列名。所以我正在使用以下代码：

Prv_mnth_so1 <- reactive({data.frame(lapply(data_uploaded1(),trimws))}) colnames(Prv_mnth_so1()) <- c("GST_ward","Category","order_and_section","combo") 但这会引发错误 警告：错误

这意味着我无法在右侧分配（）运算符，但无法解决此问题

解决方法

您只能在reactive本身内部更改reactive的值，因为它基本上是您要评估的函数（因此必须使用方括号）。

您可以1.尝试在创建Prv_mnth_so1时直接更改它，也可以2.稍后在另一个反应性上下文中：

1。

Prv_mnth_so1 <- reactive({
  new_table <- data.frame(lapply(data_uploaded1(),trimws))
  colnames(new_table) <- c("GST_ward","Category","order_and_section","combo")
  new_table
  })

Prv_mnth_so1 <- reactive({data.frame(lapply(data_uploaded1(),trimws))})

output$table <- renderTable({
  table_data <- Prv_mnth_so1()
  colnames(table_data) <- c("GST_ward","combo")
  table_data
})