purrr通过提供用于处理函数和向量的完整且一致的工具集来增强R的函数式编程工具包,例如map()和reduce()。
我有一个数据框列表,想根据列值将它们导出到单独的电子表格中。这是一个例子: DF <- data.frame(Company=c('Alpha', 'Alpha', 'Alpha', 'Beta', 'Be...
我有一大堆具有相同列名的数据框。我想编写代码,将相同的数据整理规则应用于列表中包含的每个数据帧......
最简单的表示和问题 我有世界上最简单的命名向量,例如: 向量 <- seq(101, 126) names(vec) <- letters head(vec) # a b c d e f #101 102 103 104 105 106 Now I
R >=4.1 函数符号 \(x) 会引发 group_map() 错误(purrr 包)
我想对 R 版本 4.1 及更高版本中的函数使用简短表示法 \(x) x+1 (正如 tidyverse 开发人员所鼓励的那样)以及 purrr 包中的 group_map() 。它似乎不起作用或...
purrr::map_dbl(...) 使用 Michael Foley 的时间序列分析教程绘制 ETS 模型预测时出错
复制错误 从 https://bookdown.org/mpfoley1973/time-series/ 加载库 运行 https://bookdown.org/mpfoley1973/time-series/exponential.html 第 4.1 节中的代码 变异时出错...
purrr split %>% map %>% 绑定 VS dplyr group_by %>% do
我经常想要拆分-应用-组合回归模型。我找到了两种方法,“purrr”方法和“dplyr::do()”方法。 purrr 方法的问题:I
如何使用 tidyverse 函数选择 R 中嵌套 df 中的所有共享列?
我在下面提出了一个表示。我创建了一个嵌套的 df. cols 列表示嵌套 df 中的列。我正在使用 cols 列通过 map 传递到组成的函数。 在这个...
假设我对 1000 人进行了一项调查,询问了他们的年龄、地点,并以“全选适用”格式询问了 10 个问题(例如,您喜欢我们品牌的产品#1 的原因是什么?S...
为什么purrr:map()函数不能配合load()导入Rda数据集
我已经使用 edgar 包中的 getMasterIndex 函数下载了一些 Rdata 文件。 现在我尝试使用以下代码将所有这些文件加载到 RStudio 中 - 路径 <- list.files('Master
我有一个数据集,我想用它来估计一些线性模型。可以使用下面的代码复制数据。 设置.种子(123) df <- tibble( location= c(rep("A",5),rep("B&quo...
如何使用 R 中的 map() 内部的函数,使用推荐的传递参数方式?
我以为我理解map()是如何工作的,但显然我不明白。我有一个与工作目录中的真实文件相对应的文件名向量: 文件名 <- c("filename1", "
如何使用 purrr 重命名可能有值或没有值的嵌套列表?我尝试了modify_at(),但如果其中一个列表为空,则会出现错误 图书馆(tidyverse) 我的列表<- list( list( ...
我有一个结构如下的列表: 示例列表<- lst(n1=tibble(Day= 1:10, text=letters[1:10]), n2=tibble(Day= 11:20, text=letters[1:10])) I want to perform
使用 tidyverse 生态系统的 purrr 递归计算价值
我需要在数据框中进行迭代计算。数据框(或小标题)看起来 像这样: 特里布尔( 〜年,〜产量,〜资本,〜预期, 1、1.02、北美、45900、 2、0.89、不适用、36401、 ...
我在 sf 对象上进行行操作时遇到一些问题,其中几何图形是多边形类型。 by_row 内的 sf 函数似乎不起作用,例如以下应该创建一个列表列保留...
我有一个很大的数据框列表,它们都包含相同的列标题,我想对其应用具有多个参数的相同函数。 2 个数据框的示例列表: df<- data.fr...
我正在尝试运行一个循环函数来使用我的数据框(来自一个国家的多个州的信息)并自动创建多个报告。我正在使用 purrr 中的地图,以允许循环更新...
在map2_int()中使用case_when()时出现长度0结果错误
我有一个数据集,其中每个观察结果都是交通罚单、收到罚单的汽车的车牌和日期。我想要一个数据集,其中每个观察都是一个时期、一个许可证......
我有示例机器数据: 设置.seed(0) <- 10 machine_data <- data.frame(c(1:n), sample.int(2, n, replace=TRUE), runif(n, min=50, max=100), runif(n, min=20000, max=100000)) colnames(machin...
有没有办法只返回命名列表的唯一元素 长<- list(x = c(1, 2), x = c(1, 2), x = c(1, 3), y = c(1,3)) # with unique, it doesn't work. it drops names I'd like the output to be...