Question

我有一个约束，根据这个约束，我正在为客户分配细分。但是我想更改ui中的约束并立即在后台计算细分。这是我的代码。

sumScrambles: { $sum: { $cond: [ { $eq: [ "$data.holeScores.scrambled", true ] }, 1, 0 ] } }

听http://127.0.0.1:6199 警告：代表错误：尝试执行复制'closure'类型的对象49：$ <-。data.frame 47：服务器[\ srvfps281 \ belge \ clm24522 \ Segmentasyon / server.R＃15]错误 rep（value，length.out = nrows）：尝试复制一个对象输入“关闭”

如何编辑闪亮的数据？

Answer 1

您正在创建反应式变量，必须以其他不同的方式解决它。但是，请共享更多代码，因为您的代码似乎有多个问题。除了变量寻址之外，renderText不适用于列表。

# create 
Customer <- reactive({
  # do something

  # return list
  return(list(Segment=list(onetimer=onetimer))) 
})

# output
output$result <- renderText({
  paste(unlist(Customer()$Segment),collapse="\n")
})

闪亮的编辑数据

1 个答案: