Bind server logic for compare-scope toggle

Creates a session-scoped reactive state for the compare scope.

cmp_scope_server(input, output, session, id = "cmp_scope")

Arguments

input, output, session

Standard Shiny server args

id

Input id (default: "cmp_scope")

Value

A list with a single function `get()` that returns the current scope.

Examples

if (FALSE) { # \dontrun{
  scope <- cmp_scope_server(input, output, session)
  observe({ print(scope$get()) })
} # }