Build natively multi-page 'Shiny' applications, serving content on several endpoints instead of a single page. Pages are declared with their own user interface and server function and are dispatched by URL with 'routr', including parameterised routes. Redirections, request and response middleware, and helpers to read and set cookies are also provided.

Build natively multi-page
{shiny}applications.
A {shiny} app is a single page: one url, one UI, one server function.
{brochure} makes it several. You declare a page() with its own href,
its own UI and its own server function, and the request is dispatched to
it by {routr} — including
parameterised routes such as /user/:id. Redirections, request and
response middleware, and cookie helpers come with it.
Disclaimer: building an app with {brochure} is different from the
way you usually build {shiny} apps, as you no longer operate under the
single page app paradigm. vignette("design") covers what changes.
remotes::install_github("ColinFay/brochure")
{brochure} exports page(), which masks utils::page():
library(brochure)
#>
#> Attaching package: 'brochure'
#> The following object is masked from 'package:utils':
#>
#> page
Each page has its own url, its own UI, its own server function, and its own Shiny session. The server is optional if the page is static.
library(shiny)
library(brochure)
brochureApp(
page(
href = "/",
ui = fluidPage(
h1("Home"),
plotOutput("plot"),
tags$a(href = "/contact", "Contact us")
),
server = function(input, output, session) {
output$plot <- renderPlot({
plot(iris)
})
}
),
page(
href = "/contact",
ui = fluidPage(
h1("Contact"),
tags$p("No server function in this one.")
)
),
redirect(from = "/index.html", to = "/")
)
Run it as you would any Shiny app, then navigate to / and to
/contact. Moving from one page to the other is a plain link: the
browser leaves the first page and opens a new session on the second one.
A parameterised href matches one segment, and the page reads what it
matched with get_keys():
page(
href = "/user/:id",
ui = function(request) {
fluidPage(h1(paste("User", get_keys(request)$id)))
},
server = function(input, output, session) {
message("Serving user ", get_keys()$id)
}
)
Everything lives at https://colinfay.me/brochure/.
{golem} package{brochure}Other packages implement features that are close to what {brochure}
does:
As far as I can tell, they do not serve the same goal, as they both still serve Single Page Applications.