创建简单的分类可视化工具（使用 Shiny）

Question

我有一个模型可以根据收入和婚姻状况等多个变量预测一个人是否值得信赖 (yes/no)。

我的问题是，是否可以创建一个可视化工具，您可以在其中输入每个变量的值，然后该工具会在预测此人信誉良好时为您提供“是”或“否”。

我以前见过类似的东西，我认为它是用 Shiny 制作的。但是，我再也找不到了。

如有任何帮助或提示，我们将不胜感激！

伯特

Answer 1

编写一个函数 mymodel(a,b,c,d....)，其中 a:d 是您的变量，它 returns 根据信用度判断为真或假。

在您的 UI 中，使用此处找到的小部件：http://shiny.rstudio.com/tutorial/lesson3/ 将值传递给输入对象。

那么，您可以使用：

shinyServer(
  function(input, output) {

    output$text1 <- renderText({ 
      if(mymodel(input$widget1,input$widget2,...)) {
          "Credit-Worthy"
      } else {
          "Not Credit-Worthy"
      }

    })

  }
)

确保在你的 UI 中，然后你通过：

mainPanel(
      textOutput("text1")
    )

在 http://shiny.rstudio.com/tutorial/lesson4/

中找到

这将为您提供个人信用度的文本输出。如果想有其他的视觉效果，可以使用上面相同的if语句，将不同的themes/images/etc..传给输出。

创建简单的分类可视化工具（使用 Shiny）

Creating easy classification visual tool (with Shiny)

classification

shiny