如何最好地在R函数中构建交互式例程

时间:2019-05-24 18:00:15

标签: r shiny flexdashboard

我正在编写一个R例程,该例程将信息提供给最终用户,然后查询他们的响应。收到响应后,我需要循环进行一些其他处理以“更新一年”,然后我要再次提出选择。我的例程的目标是为最终用户模拟环境。

我一直在使用readline()来捕获响应,但是挑战在于最终用户必须依靠excel来查看报告。我希望所有这些都尽可能在R中发生(因为它更加简化和无缝)。

我觉得解决方案在于发光板或Flexdashboard。我的闪亮挑战是,我不知道在收集输入后如何循环播放。对于flexdashboard,我可以显示信息,但是readline()并不是收集用户输入的最优雅的方法。

adding_example<-function(starting_value){

  yr<-1
  end_value<-starting_value
  while (yr<=10) {
    print(end_value)
    val<-readline("What value would you like to add?: ")
    end_value<-end_value+as.numeric(val)
    yr<-yr+1
  }

  return(end_value)
}

此例程有效。感谢您提供任何有助于封装此循环的闪亮例程(或flexdashboard)的帮助!

0 个答案:

没有答案