Combine ports function

This function combines ports into a reactive list (reactiveValues)

combine_ports(...)

Arguments

...

key/value pairs of ports

Examples

if (FALSE) {
# Somewhere in the app...
MyModule <- R6::R6Class("MyModule", inherit = tidymodules::TidyModule)
MyModule$new("Mod1")
MyModule$new("Mod2")
MyModule$new("Mod3")

# Must be in the server code and after calling the modules!
callModules()
observe({
  combine_ports(
    input_1 = mod(1)$getOutput(1),
    input_2 = mod(2)$getOutput(1)
  ) %>1% mod(3)
})
}