nessy
A NES css for Shiny.
Note: I did not code the CSS, but brought an existing one to Shiny. Give the original css a star if you like it!
Install
#install.packages("remotes")
remotes::install_github("ColinFay/nessy")Init
Starting point
Every new page is launched by the cartridge() function. Itβs more or
less equivalent to shiny::fluidPage(), but with NES CSS loaded.
library(nessy)
ui <- cartridge(
title = "{nessy}",
subtitle = "NES-style CSS Framework for Shiny.",
footer = "{nessy}, based on NES.css"
)
server <- function(input, output, session) {
}
shiny::shinyApp(ui, server)
New container
You can simply pass along a tagList() of objects. The framed areas are
launched by the container, container_simple and
container_with_title functions.
library(nessy)
ui <- cartridge(
title = "{nessy}",
container_with_title(
"a container",
octocat_animate()
)
)
server <- function(input, output, session) {
}
shiny::shinyApp(ui, server)
UI Elements
There are five different buttons & a radio_buttons():
ui <- cartridge(
title = "{nessy}",
container_with_title(
title = "Buttons",
button("Normal", "Normal"),
button_primary("Primary", "Primary"),
button_success("Success", "Success"),
button_warning("Warning", "Warning"),
button_error("Error", "Error"),
radio_buttons("sure", "Are you sure?", c("yes", "no"))
)
)
server <- function(input, output, session) {
}
shiny::shinyApp(ui, server)
You can also find:
- Balloons
- Checkbox
- Text Input
- Various Icons
Example
nessy_examples() returns the path to all available examples.
nessy::nessy_examples()
#> [1] "app2.R" "app3.R" "app4.R" "exampleapp.R"You can then:
shiny::runApp(nessy_examples("exampleapp.R"))
Please note that the βnessyβ project is released with a Contributor Code of Conduct. By contributing to this project, you agree to abide by its terms.