Блог

Главная - Вопросы по программированию - Могу ли я иметь формулы в теле гибкой таблицы R Markdown HTML

Могу ли я иметь формулы в теле гибкой таблицы R Markdown HTML

#r #r-markdown #flextable

#r #r-markdown #гибкая таблица

Вопрос:

Я хотел бы включить формулы с греческими буквами и индексами в тело гибкой таблицы в HTML-документе R Markdown. Мой приведенный ниже код настолько близок, насколько я могу получить.

 ---
title: "html"
date: "`r Sys.Date()`"
output:
  html_document:
    df_print: paged
---

```{r setup, echo = FALSE, message=FALSE}
knitr::opts_chunk$set(echo = FALSE)
library(flextable)
library(dplyr)
```


```{r make-table}
epi <- data.frame(label= c("Exposured", "Not Exposed"), 
                  Yes = c("π_11", "π_21"),
                  No = c("π_12", "π_22"))

theHeader <- data.frame(
  col_keys = colnames(`epi`),
  line1 = c("", rep("Has Outcome", 2)),
  line2 = c("", "Yes", "No")
)

flextable(epi, col_keys = theHeader$col_keys) %>%
  set_header_df(
    mapping = theHeader,
    key = "col_keys"
  ) %>% 
  theme_booktabs() %>% 
  autofit(part = "all") %>%    
  align(align = "center", part = "all") %>% 
  merge_h(part = "header") %>% 
  align_nottext_col(align = "center")
```

Это приводит к этому:

введите описание изображения здесь

Есть ли разумный способ печатать формулы в теле гибкой таблицы?

Я пишу конспекты лекций. Поэтому ссылки (предлагаемые чтения) для поддержки решения были бы весьма признательны.

Комментарии:

1. поддержка формулы существует, но ограничена davidgohel.github.io/flextable/articles / … . например, нет поддержки mathjax.

2. Спасибо за ответ. Я нашел ваши примеры форматирования заголовков / меток, но я пытаюсь включить формулы в качестве ячеек таблицы. Есть ли плавающий пример, который показывает, как вставлять формулы в тело таблицы?

3. да, используйте part=»body». У меня нет другого ресурса для предоставления, кроме davidgohel.github.io/flextable .