使用两个参数使用lapply生成多个相似的图
辛瓦尔
我想使用两个不同的参数（颜色和组）生成几个相似的图。我只能使用组来完成此操作，但是使用颜色矢量无法正常工作。它读取四种调色板颜色，而不是每次读取一种。
pacman::p_load(ggplot2, magrittr)
#make sample data
groups <- letters[23:26]
df <- data.frame(x = rnorm(n = 60,mean = 3.5, sd = 3.4),
y = rnorm(n = 60,mean = 3.5, sd = 3.4),
g = c(rep(groups[1],15),rep(groups[2],15),rep(groups[3],15),rep(groups[4],15)))
colors_pal <- c("#264653", "#2a9d8f", "#457b9d", "#e76f51")
plot_reg_line_equation <- function(df, groups, colors_pal) {
ggplot(data = dplyr::filter(.data = df, g==groups), aes(x = x, y = y)) +
geom_smooth(method = "lm", se=FALSE, color="black", formula = y ~ x) +
geom_point(color = colors_pal) +
ggtitle(label = paste0(groups)) +
jtools::theme_apa() +
theme(axis.line = element_line(colour = "black"),
panel.grid.major = element_blank(),
panel.grid.minor = element_blank(),
panel.border = element_blank(),
panel.background = element_blank())
}
lapply(groups, plot_reg_line_equation, df = df, colors_pal = colors_pal) %>% patchwork::wrap_plots()
#> Error: Aesthetics must be either length 1 or the same as the data (15): colour
由reprex软件包（v0.3.0）创建于2020-12-29
罗纳克·沙
由于您有两个不同的参数，请使用Map：
Map(function(x, y) plot_reg_line_equation(df, x, y), groups, colors_pal) %>%
patchwork::wrap_plots()
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
编辑于
相关文章
Related 相关文章
- 1
如何在SQL中使用两个相似的参数执行搜索功能
- 2
使用Lapply应用带有两个参数的函数
- 3
如何使用Doctrine在Symfony中的两个实体之间共享相似的属性？
- 4
使用两个相似的集合视图单元格，从而避免代码重复
- 5
使用numpy数组比较两个相似的PIL图像不起作用
- 6
使用两个相似的集合视图单元格，从而避免代码重复
- 7
如何使用 vanilla javascript 将 HTML 附加到两个相似的元素？
- 8
在两个相似的类之间使用 reinterpret_cast 时出错？
- 9
使用“ GROUP BY”的两个字段相似的SQL
- 10
如何使用SELECT INTO将两个相似的表列的值放入一个表中？
- 11
如何通过分解两个非常相似的类在Argparse的类中传递参数
- 12
使用angularJS提交具有两个相似的私有值的表单时，在控制台中收到错误
- 13
如何使用两个带有多个单词的参数
- 14
使用lapply基于两个或多个因子变量对数据框进行子集
- 15
.preventDefault（）合并两个相似的函数-javascript
- 16
Linq加入两个相似的对象列表？
- 17
从两个文件中删除相似的行
- 18
如何合并两个相似的JavaScript代码块？
- 19
在两个相似的USB设备之间进行区分
- 20
比较两个文档，找到相似的句子
- 21
Python，从两个列表中删除相似的值
- 22
Linq加入两个相似的对象列表？
- 23
C ++避免编写两个相似的函数
- 24
如何结合两个几乎相似的RxJava方法？
- 25
Laravel 路由 - 两个名称相似的 url 地址
- 26
两个相似的多对多关系
- 27
在两个文件中查找相似的列
- 28
Django：结合两个相似的 util 函数
- 29
两个相似的pose有很大的相对欧拉角
我来说两句