for循环计算多个反应变量

Question

如何设置每次用户更改输入值时更新多个无效值的for循环？

例如，程序应该读取原始文件。然后根据原始文件的长度多次运行for循环，每次更新我们基于if语句的计数器。 每次用户更新输入值时，都应相应地更新计数器。

下面我尝试以简化格式翻译我的想法。

谢谢你们

my_data <- read.csv("whatever_raw_file.csv")
counter_A <- 0
counter_B <- 0

for (i in 1:length(my_data)) {
  if (my_data[i] > user_input_value) {
    counter_A <- reactive({
      counter_A <- counter_A + 1
      counter_A
      })
  }
  else {
    counter_B <- reactive({
      counter_B <- counter_B + 1
      counter_B
    })
  }
}

Answer 1

您可以改为使用{{1}}。

类似的东西：

{{1}}