在数据表中渲染数学符号

Question

如何将乳胶符号代码传递到 R 中的数据表？我找到了这篇文章，但我不懂 JS，也不知道如何在 R 中实现这样的东西。

[编辑]我也尝试了这篇文章中的 LaTeX 解决方案，但得到了一个空白表格。

MWE

library(DT)

df <- data.frame(var1 = c("A", "B"),
                 var2 = c("$\\alpha$", "$\\beta$"))

df %>%
  datatable(
    rownames = FALSE, escape = TRUE,
    colnames = c("Col1", "Col2"), 
    filter = "top"
  )

Answer 1

您可以像这样使用

{katex}

package：

library(DT)
library(katex)

katex_html <- function(tex) {
  katex::katex_html(
    tex, 
    displayMode = FALSE, 
    include_css = TRUE, 
    preview = FALSE
  )
}

data.frame(
  var1 = c("A", "B"),
  var2 = c(
    katex_html("\\alpha"), 
    katex_html("\\beta")
  )
) %>%
  datatable(
    rownames = FALSE,
    colnames = c("Col1", "Col2"), 
    filter = "top",
    escape = FALSE
  )

^{创建于 2024-04-18，使用 reprex v2.1.0}