Many of the amazing works of Álvaro Trigo for Shiny!
# install.packages("remotes")
remotes::install_github("RinteRface/fullPage")
Includes the following frameworks:
full
.page
.multi
.All ships with:
Online:
Locally:
demo("fullPage", package = "fullPage")
demo("pagePiling", package = "fullPage")
demo("multiPage", package = "fullPage")
fullPage
input$slide_origin
: origin slideinput$slide_destination
: destination slideinput$slide_direction
: scroll directionpagePiling & multiScroll
input$slide_anchor
: slide anchorinput$slide_index
: slide indexlibrary(shiny)
library(fullPage)
ui <- fullPage(
fullSection(
menu = "first",
center = TRUE,
h1("Callbacks")
),
fullSection(
menu = "second",
center = TRUE,
h3("Slice"),
verbatimTextOutput("slide")
)
)
server <- function(input, output){
output$slide <- renderPrint({
input$slide_origin # returns menu
})
}
shinyApp(ui, server)