1.默认的侧边栏布局模板
ui <- fluidPage( sidebarLayout( sidebarPanel(), mainPanel() ) )
2.shinydashboard基础布局模板
library(shiny)
library(shinydashboard)
ui <- dashboardPage(
dashboardHeader(),
dashboardSidebar(),
dashboardBody()
)
server <- function(input, output) { }
shinyApp(ui, server)3.shinydashboard标准代码模板
header <- dashboardHeader()
sidebar <- dashboardSidebar()
body <- dashboardBody()
ui <- dashboardPage(header, sidebar, body)
server <- function(input, output) { }
shinyApp(ui, server)4.双脚本模板
ui.R
library(shiny) shinyUI(fluidPage( headerPanel(), sidebarPanel(), mainPanel()
server.R
library(shiny)
shinyServer(function(input, output) {}
作者:小洁忘了怎么分身
链接:https://www.jianshu.com/p/06f6b3dce680