equation <- "\\frac{\\Sigma(|positive|)-\\Sigma(|negative|)}{\\Sigma(|positive|)+\\Sigma(|negative|)}x100"
html <- knitr::is_html_output()
rd <- !html
katex::katex_html(equation)
katex::math_to_rd(equation)


LCBC-UiO/Questionnaires documentation built on July 18, 2023, 6:45 p.m.