'Rendering HTML text from Excel file
How can I edit this so that the text rendenders in HTML? I've formated the excel document but it displays the tags when I run the code.
output$methodologySummary <- renderUI({ # Get reactive methodology definitions text that appears in app
req(input$measure)
dat <- g_measures_page_text %>%
left_join(g_data_dictionary, by = "measure_id") %>%
filter(measure_short_name == input$measure) %>%
select(c(numerator, denominator, inclusions, exclusions, notes))
names(dat) <- c("Numerator", "Denominator", "Inclusions", "Exclusions", "Notes")
dat %<>% pivot_longer(cols=everything(), names_to = "var_name", values_to = "var_detail") %>%
filter(!is.na(var_detail))
validate(
need(nrow(dat) > 0, "Methodology information for this measure will be added in a future update.")
)
return(infoListHTML(dat)) #This function is defined down in the "HTML functions" section.
})
Sources
This article follows the attribution requirements of Stack Overflow and is licensed under CC BY-SA 3.0.
Source: Stack Overflow
| Solution | Source |
|---|
