我想在R闪亮的应用程序中使用反应式功能，但却陷入了两者之间

我在下面提供了我遇到问题的闪亮应用程序的R代码：

Planning_data_Selected_filtered <- reactive({
subset(Planning_data_Selected , Planning_data_Selected$Cost_Element %in% input$Cost_Element & Planning_data_Selected$Cost_Center %in% input$Cost_Center)
})

Planning_data_Selected_new <- Planning_data_Selected_filtered()
Planning_data_Selected_new$Planning_Cost <- round(as.numeric(na_to_zero(Planning_data_Selected_new$Planning_Cost)), 0)
Planning_data_Selected_new$Planning_Cost_Revised <- round(as.numeric(Planning_data_Selected_new$Planning_Cost), 0)
Planning_data_Selected_new$Row_ID <- as.numeric(Planning_data_Selected_new$Row_ID)

Planning_data_Selected_disp <- Planning_data_Selected_new %>%
select(-c(RF1, Document_Date, Created_on, Document_Header_Text, Entered_by, Exchange_Rate_Type, `Fiscal _Year`)) %>% 
rename(Fiscal_Year = Fiscal_Year1)

Planning\u data\u Selected\u filter\u您遇到了什么样的“问题”？你有任何erro味精等吗？您的
reactive（）
在哪里使用？是在render（）等内部吗？嗨，你能添加一个示例吗？帮你做这件事会容易得多