Как преобразовать вектор с простым HTML во вложенный блестящий список тегов?
Rep. Пример
library(shiny)
library(htmltools)
html_str <- '<div><h1>Headline</h1><p>Text</p></div>'
И htmltools::as.tags()
, и htmltools::tagList()
не работают. Хотя в этом посте показан пример того, как можно преобразовать html в spark.tags, я отказываюсь верить, что ни один из основных пакетов не предлагает более простого решения.
Желаемый выход
result <- tags$div(tags$h1("Headline"), tags$p("Text"))
> class(result)
[1] "shiny.tag"