小编Nic*_*las的帖子

在RStudio中使用Knit PDF时,如何更改纸张尺寸?

默认情况下,Knit PDF创建的PDF文档是美国字母大小.相反,我想创建A4尺寸的文件.我觉得这应该很容易改变,无论是在RStudio GUI中还是在Rmd文件顶部的元数据中添加一个选项.不幸的是我找不到任何说明如何做到这一点.有没有办法指定纸张大小,最好是在Rmd文件本身内?我仍在使用RStudio版本0.98.953,但如果有帮助可以升级.

如果有人能指出我正确的方向,我将不胜感激.

pdf r rstudio knitr r-markdown

23
推荐指数
2
解决办法
8392
查看次数

通过累积分布的中值添加垂直线 (ggplot2)

我正在使用 ggplot2 在单个图上绘制两个累积分布。使用 中的示例,这很简单?stat_ecdf。我的困难在于通过每个分布的中值添加垂直线。

使用单个发行版即可轻松完成此操作:

df <- data.frame(x = c(rnorm(100, 5, 10), rnorm(200, 0, 10)),
  g = as.factor(c(rep(1, 100), rep(2, 200))))

ggplot(df, aes(x)) +
  stat_ecdf() + 
  geom_vline(aes(xintercept = median(x)))
Run Code Online (Sandbox Code Playgroud)

但我无法找到一种简单的方法来为多个分布添加垂直线。我尝试了以下方法但没有成功:

ggplot(df, aes(x, colour = g)) +
  stat_ecdf() +   
  geom_vline(aes(xintercept = median(x), colour = g))
Run Code Online (Sandbox Code Playgroud)

我可以通过分阶段组装图来获得所需的结果:

p <- ggplot(df[df$g == 1, ], aes(x)) +
  stat_ecdf() + 
  geom_vline(aes(xintercept = median(x)))

p + 
  stat_ecdf(data = df[df$g == 2, ]) +
  geom_vline(data = df[df$g == 2, ], aes(xintercept = median(x)))
Run Code Online (Sandbox Code Playgroud)

但这似乎是一种不整洁的方式,而且还让我手动设置不同的线条颜色。

当然有更好的方法吗?

r ggplot2

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

标签 统计

r ×2

ggplot2 ×1

knitr ×1

pdf ×1

r-markdown ×1

rstudio ×1