R：使用多个输入源进行更新
我正在创建一个闪亮的应用程序，我想为用户提供两种方式来给出两个输入值：直接通过两个输入滑块，或者通过两个数据表，应用程序在两个数据表上以两个值作为输出执行一些计算。 输出值相互依赖，总和应为1 我让这两种方法分别工作：滑块1在滑块2的值更改时更新，反之亦然，我使用数据计算输出值（参见MWE） 现在我想将它们结合起来，这样当a.）手动更新另一个滑块时，每个滑块都会更新；或b.）数据表已更改。 我想在另一个函数中使用这些更新的滑块值进行计算 当有两个输入源可用时，有没有建议更改updateSliderInput（）的值 MWE：R：使用多个输入源进行更新,r,shiny,R,Shiny,我正在创建一个闪亮的应用程序，我想为用户提供两种方式来给出两个输入值：直接通过两个输入滑块，或者通过两个数据表，应用程序在两个数据表上以两个值作为输出执行一些计算。 输出值相互依赖，总和应为1 我让这两种方法分别工作：滑块1在滑块2的值更改时更新，反之亦然，我使用数据计算输出值（参见MWE） 现在我想将它们结合起来，这样当a.）手动更新另一个滑块时，每个滑块都会更新；或b.）数据表已更改。 我想在另一个函数中使用这些更新的滑块值进行计算 当有两个输入源可用时，有没有建议更改updateSlide
库（闪亮）
图书馆（rhandsontable）
####初始化####
#初始数据
数据是否可以只为反应性的changeA
和changeB
添加observe
observe({
wts <- ComputeWeights(changeA(),changeB())
updateSliderInput(session, "w1", value = wts[1], min = 0, max = 1, step=0.01)
updateSliderInput(session, "w2", value = wts[2], min = 0, max = 1, step=0.01)
})
观察({
wts
observe({
wts <- ComputeWeights(changeA(),changeB())
updateSliderInput(session, "w1", value = wts[1], min = 0, max = 1, step=0.01)
updateSliderInput(session, "w2", value = wts[2], min = 0, max = 1, step=0.01)
})