captionerパッケージで図・表に対する参照(レファレンス)を取得する
http://datascienceplus.com/r-markdown-how-to-number-and-reference-tables/にあった話。
captionerパッケージを用いると、R Markdownの中での図表の参照を簡単に書くことができるというお話。
以下、簡単な例だが、こんな様に書けば図表に対する参照もできますよと。
--- title: "" output: html_document --- ```{r setup, include=FALSE} knitr::opts_chunk$set(echo = TRUE) ``` ## Example of caption Define caption. ```{r} table_nums <- captioner::captioner(prefix = "Tab.") tab.1_cap <- table_nums(name = "tab_1", caption = "German Bundesliga: Final Table 2015/16, Position 7-12") ``` Use it. `r table_nums('tab_1')` ```{r fig.cap = tab.1_cap} knitr::kable(mtcars[1:10, c(1,2,7,9)], align = c('c', 'l', 'c', 'c'), row.names = TRUE) ``` Define customized reference function. ```{r} f.ref <- function(x) { stringr::str_extract(table_nums(x), "[^:]*") } ``` Original version. `r table_nums('tab_1')` says that .... Customized one. `r f.ref('tab_1')` says that ....