我有一个模型可以根据收入和婚姻状况等多个变量来预测一个人是否值得信任(是/否)。
我的问题是,是否可以创建一个可视化工具,您可以在其中输入每个变量的值,然后如果它预测此人值得信任,则工具会给出“是”或“否”。
之前我见过这样的东西,我觉得它是用Shiny制作的。但是,我再也找不到了。
非常感谢任何帮助或提示!
伯特
答案 0 :(得分:0)
编写一个函数mymodel(a,b,c,d ....),其中a:d是你的变量,它根据信用价值返回TRUE或FALSE。
在您的用户界面中,使用此处的小部件: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"
}
})
}
)
确保在用户界面中传递:
mainPanel(
textOutput("text1")
)
在http://shiny.rstudio.com/tutorial/lesson4/
中找到这将为您提供个人信誉的文本输出。如果您想要其他视觉效果,可以使用上面相同的if语句将不同的主题/图像/等传递给输出。