我在R Markdown中对齐方程式时遇到了一些困难(即将公式放在页面的最左侧,并对齐后续的线条).我一般都认为我想在amsmath包中设置[fleqn]选项以保持对齐所有方程,但是将以下内容放在我的YAML标题中会出错
'amsmath包的选项冲突'
---
author: "ME"
date: "February 26, 2015"
header-includes:
- \usepackage[fleqn]{amsmath}
output: pdf_document
---
我的文件中的一节:
$$
\begin{aligned}
Bias(\hat{\theta}) &= E(\hat{\theta}) - \theta \\
&= E(2 \bar{X} -1) - \theta \\
&= \frac{2}{n}\sum_{i=1}^n E(X_i) -1 -\theta \\
&= 2E(X) - 1 - \theta \\
&= 2 \cdot \frac{\theta+1}{2} - 1 - \theta \\
&= 0 \\
\end{aligned}
$$
谢谢
这似乎应该是一个相当容易解决的问题,但我在找到答案时遇到了一些麻烦.
我有一个包含长小数的向量,我想将其截断为特定的小数.我不想舍入它,而只是删除超出我想要的小数位数的值.
例如,如果我需要4位十进制数字,我希望0.123456789返回0.1234.这不是打印特定数量的数字而是将原始值截断为给定数字的问题.
谢谢.
我正在寻找一种简单的方法来执行以下操作，但使用 dplyr，基本上只是在满足条件时用 NA 替换 3 列中的值。
dta[dta$na.ind == 1, c('x1', 'x2', 'x3')] <- NA
我能想到的使用 dplyr 的唯一方法如下，但我觉得应该有一个更简单的方法
dta <- dta %>%
mutate(x1 = ifelse(na.ind == 1, NA, x1),
x2 = ifelse(na.ind == 1, NA, x2),
x3 = ifelse(na.ind == 1, NA, x3))
谢谢！
我有一个 rmarkdown 文档，其中包含几个当前正在打印的表格kable(tbl, align = 'c')，但我想知道是否可以设置一个选项来默认打印文档中的所有表格并使用中心对齐。
就像是
knitr::opts_chunk$set(fig.align = 'center')
除了居中表格输出而不是图形对齐。
我正在尝试使用 \label{} 选项在 R 中创建一个乳胶格式的表。
类似的东西
library(tidyverse)
library(knitr)
library(kableExtra)
data_frame(a = 1:3, b = 2:4) %>%
kable(align = 'c', format = 'latex') %>%
kable_styling(full_width = FALSE)
结果输出如下，但我想将 \label{label_value} 参数添加到带有我可以定义的 label_value 的乳胶表中
\begin{table}[H]
\centering
\begin{tabular}{c|c}
\hline
a & b\\
\hline
1 & 2\\
\hline
2 & 3\\
\hline
3 & 4\\
\hline
\end{tabular}
\end{table}
我正在尝试在 R 中自动创建表，我可以保存并包含在乳胶文档中
我正在寻找一种简单的方法将数据框中的所有变量(以'date'开头)转换为日期lubridate::dmy()(它们当前是dmy格式的字符).
我原本以为会有mutate_if或mutate_each,dplyr但我正在努力弄清楚如何.
我试图确定如何使用dplyr pmap应用于不同长度列表的函数。
我想做的一个非常简单的例子如下
list_1 <- list(1, 2, 3)
list_2 <- list(1, 2)
list_3 <- list(1, 2, 3, 4, 5)
pmap(list(list_1, list_2, list_3), ~ ..1 + ..2 + ..3)
其中上面的结果将是一个长度列表，length(list_1) * length(list_2) * length(list_3)其中包含 3 个列表的所有组合的总和
我的实际应用程序有点复杂，因为我试图拟合响应和其他函数输入的glm模型。list_1list_2list_3glm