R/Shiny/bs4Dashの基礎⑦
bodyにカードを追加
こんな感じ(雑)。カードの関数って色々と機能がありそう。
library(shiny)
library(bs4Dash)
ui <- bs4DashPage(
navbar = bs4DashNavbar(),
sidebar = bs4DashSidebar(
bs4SidebarMenu(
bs4SidebarHeader(title = "Iris"),
bs4SidebarMenuItem(text = "X", tabName = "x")
)
),
body = bs4DashBody(
bs4TabItems(
bs4TabItem(
tabName = "x",
bs4Card(
plotOutput(outputId = "a"),
inputId = "a",
title = "a",
status = "primary"
)
)
)
),
controlbar = bs4DashControlbar(),
footer = bs4DashFooter(),
title = "yono2844"
)
server <- function(input, output, session) {
output$a <- renderPlot(expr = {
plot(iris$Sepal.Length, iris$Sepal.Width)
})
}
shinyApp(ui = ui, server = server)
Author And Source
この問題について(R/Shiny/bs4Dashの基礎⑦), 我々は、より多くの情報をここで見つけました https://qiita.com/yono2844/items/a3b8246c18e831d2b77d著者帰属:元の著者の情報は、元のURLに含まれています。著作権は原作者に属する。
Content is automatically searched and collected through network algorithms . If there is a violation . Please contact us . We will adjust (correct author information ,or delete content ) as soon as possible .