You can easily make a module return any number of reactive objects in a list by doing something like this (this is an example skeleton structure with some outputs sprinkled in):
exampleModuleUI <- function(id) {
ns <- NS(id)
tagList(
uiOutput(ns("output1")),
htmlOutput(ns("output2"))
)
}
exampleModule <- function(input, output, session) {
ns <- session$ns
output$output1 <- renderUI({
...
})
output$output2 <- renderText({
...
})
r1 <- reactive({
...
})
r2 <- reactive({
...
})
# Return a list of reactive objects
rlist <- list(r1 = r1, r2 = r2)
return(rlist)
}