R/filter_tree_ui.R

In NicolasJBM/teachR: Create and maintain teaching, learning, and testing materials

#' @name filter_tree_ui
#' @title Select documents from tree
#' @author Nicolas Mangin
#' @description Module allowing the user to select documents by clicking on the different sections of a classification tree.
#' @param id ID of the module to connect the user interface to the appropriate server side.
#' @return Tibble. List of selected documents.
#' @importFrom jsTreeR jstreeOutput
#' @importFrom shiny NS
#' @export

filter_tree_ui <- function(id){
  ns <- shiny::NS(id)
  base::list(
    jsTreeR::jstreeOutput(ns("selection_tree"))
  )
}