Question

我无法弄清楚为什么在这段代码中出现以下错误。我先感谢您的任何想法。谢谢。

警告：$中的错误：“ closure”类型的对象不可子集化

Index_Percent <- reactive({input$IndexWeight})

TBA_Index_Data <- reactive({
  left_join(TBAData_Gathered,Index_Weights)

TBA_Index_Data$Index_Percentage[TBA_Index_Data$cusip == "Cash"] <- Index_Percent()

})

Answer 1

从您提供的代码中，您似乎正在尝试在其内部加载反应性函数。

正确的格式如下：

Index_Percent <- reactive({input$IndexWeight})

TBA_Index_Data <- reactive({
  # these variables are reactive functions? if so, you need to add () as well.
  table <- left_join(TBAData_Gathered,Index_Weights) 
  table$Index_Percentage[table$cusip == "Cash"] <- Index_Percent()
  table
})

反应性闪亮对象类型关闭不能子集化

1 个答案: