Как вставить цитату в сноску таблицы, созданной с помощью Kable? - PullRequest
0 голосов
/ 24 апреля 2020

Я пытался добавить цитату в сноску (или даже в любой текст в таблице), но она не работает, текст цитаты отображается как есть. Я подумал, что мне нужно изменить таблицу форматирования на markdown вместо latex и использовать bookdown::pdf_document2, но оба не решили проблему. другая попытка состояла в том, чтобы создать текст цитирования вне таблицы с отдельным фрагментом кода, а затем paste внутри footnote также не работал. это мой код:

---
title: "scientific report"
output:
  pdf_document:
   fig_caption: true
   keep_tex: true
   number_sections: yes
   latex_engine: xelatex
csl: elsevier-with-titles.csl
bibliography: citations.bib
link-citations: true
linkcolor: blue
---



# This is an exaample


the number of the table below is [\ref{do}]

P.S. I wrote the superscript (a) manually in the xlsx file.

```{r  echo=FALSE }
library(knitr)
library(kableExtra)
library("readxl")

dfdf <-  read_excel("dyss_count.xlsx")
df <- as.data.frame(dfdf)

options(knitr.kable.NA = '')

kable(df, "latex", longtable = T, booktabs = T,escape = F ,caption = 'dosage \\label{do}',align = "c") %>%
  kable_styling(latex_options = c('repeat_header'), font_size = 7) %>%

 footnote(general ="A general footnote",


           alphabet = 'the source is @Burg_2019',

           general_title = "General: ", number_title = "Type I: ",
           alphabet_title = "Type II: ", 
           footnote_as_chunk = T, title_format = c("italic", "underline")
           )


результат:

Буду очень признателен за любую полезную информацию.

Ответы [ 2 ]

2 голосов
/ 25 апреля 2020

хорошо, после многих попыток он работал с обычной перекрестной ссылкой здесь . поэтому, если у кого-то еще возникла такая же проблема, я просто сделал это:

(ref:caption) The source is [@Burg_2019] за пределами чанка, а затем внутри сноски footnote(general ="A general footnote",alphabet = "(ref:caption)" )

0 голосов
/ 25 апреля 2020

Можно попробовать добавить заголовок, используя css -> kable_styling (extra_ css = ..), чтобы вы могли изменить его свойства стиля? Просто мысль.

...