test-module/app.R

#
# This is a Shiny web application. You can run the application by clicking
# the 'Run App' button above.
#
# Find out more about building applications with Shiny here:
#
#    http://shiny.rstudio.com/
#

library(shiny)
library(poisshiny)

# Define UI for application that draws a histogram
ui <- tagList(
  useShinyjs(),
  tags$head(includeCSS("style.css")),
  navbarPage(title =  proj, 'About'),
             tabPanel(title = 'About',
                      about_ui('about')))

# Define server logic required to draw a histogram
server <- function(input, output, session) {

  callModule(about_server(), "about")

}

# Run the application
shinyApp(ui = ui, server = server)
poissonconsulting/poisshiny documentation built on May 14, 2019, 7:22 p.m.