小编RTM*_*RTM的帖子

我有一个数据集,我想从中绘制小的倍数,特别是在2乘2的数组中,如下所示:

mydf <- data.frame(letter = factor(rep(c("A", "B", "C", "D"), each = 20)), x = rnorm(80), y = rnorm(80))
ggplot(mydf, aes(x = x, y = y)) + geom_smooth(method = "lm") + geom_point() + facet_wrap(~ letter, ncol = 2)

但是,我希望每个构面标签都包含一个表达式,例如

expression(paste("A or ", alpha))

我可以使用facet_grid()via 来实现这一点

f_names <- list('A' = expression(paste("A or ", alpha)), 'B' = expression(paste("B or ", beta)), 'C' = expression(paste("C or ", gamma)), 'D' = expression(paste("D or ", delta)))
f_labeller <- function(variable, value){return(f_names[value])}
ggplot(mydf, aes(x = x, …

我在 RMarkdown 中编写幻灯片并将其编译成 Beamer 演示文稿。我想在幻灯片上逐步显示项目符号和子项目符号。下面是一个.Rmd文件，显示了我的一些失败的尝试。在这些尝试中，我在子项目符号行之前插入了 4 个空格。我想在逐张幻灯片（甚至逐个列表）的基础上控制增量。

---
title: "My Title"
author: "RTM"
output: beamer_presentation
---

## This works, incremental bullets

>- Bullet 1
>- Bullet 2

## This nests, but does not increment

- Bullet 1
- Bullet 2
    + subbullet 1
    + subbullet 2

## This increments, but fails to nest

>- Bullet 1
>- Bullet 2
>    - subbullet 1
>    - subbullet 2

## This increments, but fails to nest

>- Bullet 1
>- …

我正在将一个R数据帧写入.xlsx文件.

我希望某些细胞能够填充颜色.我正在使用xlsxR中的软件包,我发现手册很难消化.这是一个简单的例子:

data(cars)
write.xlsx(cars, "cars.xlsx")

然后,我想填写dist20到25之间的单元格,例如

因为我只是有一个我直接使用的数据框,所以write.xlsx我没有工作簿java对象.

所以,我不认为这些例子?CellStyle会适用于这种情况.

我很乐意,如果有一种简单的方法,例如,使用参数定义单元格样式write.xlsx,或者通过选择数据框中的单元格(即,不在java对象工作簿中).