diff --git a/R/app_server.R b/R/app_server.R index 7e65f4e..ba028f0 100644 --- a/R/app_server.R +++ b/R/app_server.R @@ -608,6 +608,16 @@ app_server = function(input, output, session) { # ----------- Help-related functions -------------------- + observeEvent(input$help_about, { + ano_modal("about") + }) + + # ----------- Legend text -------------------- + output$legend_text = renderUI({ + req(update_network()) + HTML('Arrows Percentages: expert classifications. Orange:majority. Green: consensus if available') + }) + # ----------- Patient text -------------------- output$patient_text = renderUI({ req(record()) @@ -683,10 +693,6 @@ app_server = function(input, output, session) { } }) - observeEvent(input$help_about, { - ano_modal("about") - }) - # classification_method() with ignoreInit observeEvent(classification_method(), { is_example = is_example(isolate(record())) diff --git a/R/app_ui.R b/R/app_ui.R index 0bdb9b4..4abd5c4 100644 --- a/R/app_ui.R +++ b/R/app_ui.R @@ -77,6 +77,7 @@ app_ui = function() { fluidRow( id = "patient_panel", column(12, uiOutput("patient_text")), + column(12, uiOutput("legend_text")), column(10, mod_visnet_ui("ano", height = 300)), column(2, id = "save_panel",