我正在尝试通过使用以下内容来格式化矩阵以在RMarkdown文档中显示为LaTeX:
具有将Rmatrix
转换为LaTeX字符串的函数:
bmatrix = function(x, digits=NULL, ...) {
library(xtable)
default_args = list(include.colnames=FALSE, only.contents=TRUE,
include.rownames=FALSE, hline.after=NULL,
comment=FALSE,
print.results=FALSE)
passed_args = list(...)
calling_args = c(list(x=xtable(x, digits=digits)),
c(passed_args,
default_args[setdiff(names(default_args),
names(passed_args))]))
cat("\\begin{bmatrix}\n",
do.call(print.xtable, calling_args),
"\\end{bmatrix}\n")
}
这样:
bmatrix(diag(2))
给
\begin{bmatrix}
1.00 & 0.00 \\
0.00 & 1.00 \\
\end{bmatrix}
问题是当我在LaTeX块中内联时:
$$
M = `r bmatrix(diag(2))`
$$
矩阵部分为空(我只得到“ M =“)。
我怀疑这与RMarkdown和/或pandoc转义LaTeX字符串中的HTML实体有关。
有什么办法解决吗?
我也尝试过
$$
M = `r I(bmatrix(diag(2)))`
$$
但无济于事。
尝试
$$
M =
```{r, results='asis'}
bmatrix(diag(2))
```
$$
从R代码块:
需要使用results ='asis'块选项...以确保未通过knitr处理原始表的输出。
威斯康星州
---
title: "Untitled"
output: pdf_document
---
```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = FALSE)
```
```{r}
bmatrix = function(x, digits=NULL, ...) {
library(xtable)
default_args = list(include.colnames=FALSE, only.contents=TRUE,
include.rownames=FALSE, hline.after=NULL,
comment=FALSE,
print.results=FALSE)
passed_args = list(...)
calling_args = c(list(x=xtable(x, digits=digits)),
c(passed_args,
default_args[setdiff(names(default_args),
names(passed_args))]))
cat("\\begin{bmatrix}\n",
do.call(print.xtable, calling_args),
"\\end{bmatrix}\n")
}
```
# Foo
$$
M =
```{r, results='asis'}
bmatrix(diag(2))
```
$$
产生
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句