在RMarkdown表中引用

时间:2018-07-31 12:13:52

标签: latex r-markdown kable kableextra

我正在尝试创建一个表格,该表格内置了引文。这是我要达到的目标的视觉效果。

desired output

据我所知,您只能在let ciReferenceImage = CIImage(image: referenceImage) let ciResultImage = ciWarpedImage.composited(over: ciReferenceImage) let resultImage = UIImage(ciImage: ciResultImage) rowvars的{​​{1}}中添加脚注(喜欢该程序包)。

colvars

下面是我在阅读kableExtra的Git页面后的尝试

# Create a dataframe called df
Component <- c('N2','P3')
Latency <- c('150 to 200ms', '625 to 800ms')
Location <- c('FCz, Fz, Cz', 'Pz, Oz')
df <- data.frame(Component, Latency, Location)

Output

但是此代码仅适用于标题。最终目标是,如果我可以使用BibTex引用(例如kableExtra),使代码的最后一部分看起来像

# Trying some code taken from the kableExtra guide
row.names(df) <- df$Component
df[1] <- NULL
dt_footnote <- df
names(dt_footnote)[1] <- paste0(names(dt_footnote)[2],
                                footnote_marker_symbol(1))

row.names(dt_footnote)[2] <- paste0(row.names(dt_footnote)[2], 
                                footnote_marker_alphabet(1))
kable(dt_footnote, align = "c", 
      # Remember this escape = F
      escape = F, "latex", longtable = T, booktabs = T, caption = "My Table Name") %>%
  kable_styling(full_width = F) %>%
  footnote(alphabet = "Jones, 2013",
           symbol = "Footnote Symbol 1; ",
           footnote_as_chunk = T)

有人有什么想法吗?

谢谢

1 个答案:

答案 0 :(得分:0)

最后,我要做的是使用pander生成一个临时表,然后将引用的编号手动复制到我的kable

pander(
  df,
  caption = "Temporal",
  style = "simple",
  justify = "left")