标签: r-markdown

在 R 中创建具有描述性统计的表

我想要一些关于在 R 中创建格式化表的帮助 - 无论是使用普通的 IDE 还是 R Markdown。我想做的主要事情有两件事:

  • 基于不同列按组呈现描述性统计数据(平均值、中位数、最小值、最大值)
  • 基于总样本(未分组数据)呈现描述性统计

样本数据:

   df <- data.frame(Gender = c("F", "M", "F", "M", "M", "M", "M", "F", "M", "M"),
                 Young = c("Y", "N", "Y", "N", "Y", "N", "Y", "N", "Y", "N"),
                 Age = c("14", "25", "13", "24", "14", "25", "13", "24", "10", "26"),
                 Location = c("Suburb", "Rural", "Suburb", "Rural","Suburb", "Rural","Suburb", "Rural","Suburb", "Rural"))
Run Code Online (Sandbox Code Playgroud)

预期成绩

多变的 意思是 中位数 最大限度 最小
性别
女性
男性
地点
市郊
乡村的
全部的

在 R 中有没有办法做到这一点?

r r-markdown

1
推荐指数
1
解决办法
3209
查看次数

LaTeX 空格未显示在 RMarkdown PDF 中

我使用rmarkdownbeamer制作教学幻灯片。我正在尝试在幻灯片中插入一个 LaTeX 方程,该方程中有一些空格。

$Scott's \space pi = \frac{\% \space obs. \space agreements - \% \space exp. \space agreements}{1 - \% \space exp. \space agreements}$
Run Code Online (Sandbox Code Playgroud)

当我将光标悬停在其上时,Rstudio 会正确预览方程,如下面的屏幕截图所示:

在此输入图像描述

然而,当我编织 PDF 时,空格不会出现,我得到了这个:

在此输入图像描述

我在这里错过了什么吗?

我的 Markdown 标题如下:

---
title: "XXXXXXXXXXXXXXXXXXXXXXXXXXXX"
author: "XXXXXXXXXXXXXXXXXXXXXXXXX"
institute: "XXXXXXXXXXXXXXXXXXXXXXXXXXXXX"
date: "XXXXXX"
output:
  beamer_presentation:
    incremental: true
    theme: "Berlin"
    colortheme: "dove"
    fonttheme: "structurebold"
    includes:
      in_header: preamble.tex
classoption: "aspectratio=169"

---
Run Code Online (Sandbox Code Playgroud)

`preamble.tex' 文件如下:

\usepackage{caption}
\captionsetup[figure]{labelformat=empty}
\setbeamercolor{frametitle}{fg=white,bg=black} %section slide title
\setbeamercolor{section in foot}{fg=white, bg=black} % footsections
\setbeamercolor{part title}{fg=white, bg=black}
\setbeamertemplate{footline} …
Run Code Online (Sandbox Code Playgroud)

latex r r-markdown

1
推荐指数
1
解决办法
1999
查看次数

无法将 .png 图像添加到 rmarkdown - 错误:“![”中出现意外的“[”

我想将图片 (.png) 添加到我的 r markdown 文件中(并且我想编织为 PDF)。但是,我尝试过到处推荐的这个简单代码,但它对我不起作用:

![Caption for the picture.](image.png)
Run Code Online (Sandbox Code Playgroud)

因为我收到错误:

Error: unexpected '[' in "!["
Run Code Online (Sandbox Code Playgroud)

我对 r markdown 很陌生。我不确定我做错了什么 - 我已经将 .Rmd 文件移动到了我看到的图像所在的位置,这也是推荐的,但看起来这不是问题。我以前没有见过其他人对“![]”有问题。

有人对如何解决这个问题有任何建议吗?

(另外,knitr::include_graphics("image.png") 对我有用,是的,我可以使用它,但我想找到上述问题的根源......)

r knitr r-markdown

1
推荐指数
1
解决办法
3655
查看次数

如何设置Rmarkdown输出pdf的页面颜色?

我正在这里搜索以将页面颜色添加到 Rmarkdown 的 pdf 输出中,但找不到任何可能的方法。是否可以更改Rmarkdown pdf输出的页面颜色?如果是,如何给页面添加颜色?谢谢你的帮助。

latex r-markdown

1
推荐指数
1
解决办法
402
查看次数

R-Markdown:kableExtra (loadNamespace) 问题

我想使用 RMarkdown 和 kable 创建一个 pdf 文档:

\n
---\ntitle: "markdown testfile"\nauthor: "author"\ndate: "2023-05-01"\noutput:\n  pdf_document: default\n  html_document: default\n---\n\n```{r setup, include=FALSE}\noptions(repos = list(CRAN="http://cran.rstudio.com/"))\ninstall.packages("tidyverse")\ninstall.packages("kableExtra")\n\nlibrary(tidyverse)\nlibrary(kableExtra)\n```\n\n```{r}\niris %>% \n  dplyr::slice_sample(n = 10) %>% \n  kbl() %>% \n  kable_styling()\n```\n
Run Code Online (Sandbox Code Playgroud)\n

我收到的错误消息是:

\n
Fehler: Laden von Paket oder Namensraum f\xc3\xbcr \'kableExtra\': fehlgeschlagen\n.onLoad in loadNamespace() f\xc3\xbcr \'kableExtra\' fehlgeschlagen, Details:\nAufruf: !is.null(rmarkdown::metadata$output) && rmarkdown::metadata$output %in%\nFehler: \'length = 2\' in coercion to \'logical(1)\'\nAusf\xc3\xbchrung angehalten.\n
Run Code Online (Sandbox Code Playgroud)\n

翻译成英文:

\n
Error: Failed to load package or namespace for \'kableExtra\':\n.onLoad failed in loadNamespace() for \'kableExtra\', Details:\nCall: …
Run Code Online (Sandbox Code Playgroud)

r r-markdown kableextra

1
推荐指数
1
解决办法
2024
查看次数

当编织到html时,库(printr)与data.table的“:=”交互?

我有一个在 rstudio 控制台中运行的 markdown 文件,但是当我尝试将其编织成 html 时,它会花费很长时间。我花了很长时间的尝试和错误才确定似乎包含“printr”库会触发 data.table 的 := 分配,通过尝试打印整个表(在我的情况下非常大)来挂起编织)。这是演示这一点的代码。这是 printr 的已知“功能”吗?值得指出的是,即使代码块是results='hide'orinclude=FALSE并且表格没有在 html 中显示,包含 printr 的代码仍然会运行得很慢。

library(data.table)
library(bit64)
library(printr) # printr will make data.table := to print out the data in knit?
#test_n = 4000000 # with 4000000 and printr included it will take forever
test_n = 4000

print("slow chunk start:")
print(Sys.time())
DT = data.table(a = as.integer(1:test_n),
                b = as.integer64(1:test_n),
                c = as.integer(1:test_n))
DT[, seq:=1:.N] # whole table will print if printr is included
print(DT[1:10]) …
Run Code Online (Sandbox Code Playgroud)

r knitr r-markdown data.table

1
推荐指数
1
解决办法
55
查看次数

禁止库消息输出

之前曾在以下问题中提出过类似问题

如何抑制此输出?

这次,我在最新版本的RStudio中创建了一个SCRIPT,它只有一行:

library(UsingR)
Run Code Online (Sandbox Code Playgroud)

我这次将文件保存为名为test.R的脚本文件.但是,我使用Compile Notebook图标编译为html文档.结果输出如下所示:

在此输入图像描述

在上面给出的链接的上一个问题中,答案是:

```{r message=FALSE}
library(UsingR)
```
Run Code Online (Sandbox Code Playgroud)

但是我该在这个脚本中做什么来抑制这个输出呢?我可能还会说,对RStudio RMarkdown的这些改变会让初学者更加困惑.我知道我很困惑.我以前毫不费力地做到这一点变得有点困难.

r rstudio r-markdown

0
推荐指数
1
解决办法
3930
查看次数

将HTML转换为R Markdown

有没有办法转换html文件,如https://cran.r-project.org/web/packages/tidytext/vignettes/tidytext.html,并将其转换为可执行的R Markdown文件(rmd)?

r r-markdown

0
推荐指数
4
解决办法
3098
查看次数

在Rmarkdown中隐藏R代码的一部分

如何在Rmarkdown中省略部分块?

例如:

```{r echo T, eval = T}
df <- readRDS("yourfile.RDS")
df <- readRDS("secretfile.RDS") ### NEED TO OMIT THIS PART ONLY
df
```
Run Code Online (Sandbox Code Playgroud)

我知道这些include = Fecho = F选项,但是要么省略输出df或完全省略代码.

或者,我可以这样做:

```{r echo T, eval = F}
df <- readRDS("yourfile.RDS")
```
```{r echo = F, eval = T}
df <- readRDS("secretfile.RDS") ### NEED TO OMIT THIS PART ONLY
```
```{r eval = T, echo = T}
df
```
Run Code Online (Sandbox Code Playgroud)

但这是一种笨重的方式来做它并且它会削减代码块.输出应如下所示:

df <- readRDS("yourfile.RDS")
df
Run Code Online (Sandbox Code Playgroud)

随着df以下的输出. …

r knitr r-markdown

0
推荐指数
1
解决办法
1669
查看次数

如何结合R ifelse()和kable()

我有定期运行的R Markdown脚本,其中包含条件表以及所谓的违规者。这是一个示例数据帧:

df <- data.frame(Person = c("Jack", "Jill"), Violator = c("F", "F"))

#>   Person Violator
#> 1   Jack        F
#> 2   Jill        F
Run Code Online (Sandbox Code Playgroud)

我只想显示违规者(Violator ==“ T”),本月没有任何违规者。因此,我下面的“普通”有线代码给了我这个错误,就是我期望的“下标超出范围”

如果违反者不等于“ T”,如何将我的有线代码修改为“不执行任何操作”。有ifelse()路要走吗 我愿意接受kableExtra()解决方案。

kable(df %>% filter(Violator == "T"), "html", align = "l") %>%
  kable_styling("striped", "hover", full_width = F) %>%
  column_spec(1, bold = T, background = "#FFFFFF") %>%
  collapse_rows(columns = 1)
Run Code Online (Sandbox Code Playgroud)

r r-markdown kableextra kable

0
推荐指数
1
解决办法
81
查看次数

标签 统计

r-markdown ×10

r ×9

knitr ×3

kableextra ×2

latex ×2

data.table ×1

kable ×1

rstudio ×1