dashboard")), menuItem("Plot3", tabName = "Plot3", icon = icon("dashboard")))), dashboardBody( tabItems...menuItem("tabbox3", tabName = "tabbox3", icon = icon("dashboard"))) )
body tabItems...input$count1, "%"), icon = icon("thumbs-up", lib = "glyphicon"), color = "yellow" ) }) ##与上面显示一样...下面章节将介绍如何将shinyapp共享到服务器上以及对shinyapp加密,输入账号和密码才能访问shinyapp。