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) {}
微信公众号生信星球同步更新我的文章，欢迎大家扫码关注！
我们有为生信初学者准备的学习小组,点击查看◀️
想要参加我的线上线下课程，也可加好友咨询🔼
如果需要提问，请先看生信星球答疑公告
