9得票3回答
使用purrr映射dplyr :: select函数

我有一个数据框,其中包含许多嵌套的子数据框,我想对每个嵌套的子数据框应用dplyr::select函数。以下是一个示例: library(tidyverse) mtcars %>% group_by(cyl) %>% nest %>% mutate(data2 ...

9得票2回答
使用purrr::map函数返回的列表中给每个元素命名

有没有一种方法可以自动为由purrr:map返回的列表命名? 例如,我经常运行这样的代码。 fn <- function(x) { paste0(x, "_") } l <- map(LETTERS, fn) names(l) <- LETTERS 我希望正在自动化的...

9得票2回答
从嵌套列表中仅使用purrr包中的函数提取元素

我如何只使用purrr包从嵌套列表中提取元素? 在这种情况下,我想在拆分数据框之后获得截距向量。 我已经使用lapply()完成了所需的内容,但我想仅使用purrr包功能。 library(purrr) mtcars %>% split(.$cyl) %>% map( ~lm...

9得票6回答
将分组的tibble转换为命名列表

我觉得在tidyverse中可能有比使用for-loop更好的方法。从一个标准的tibble/dataframe开始,创建一个列表,其中列表元素的名称是一列(group_by?)的唯一值,而列表元素则是另一列的所有值。 my_data <- tibble(list_names = ...

9得票5回答
多组列求和

我有一个情况,我的数据框包含图像分析的结果,其中列是图像中特定类别的比例,例如一个名为class_df的示例数据框如下: id A B C D E F 1 0.20 0.30 0.10 0.15 0.25 0.00 2 0.05 0.10 0.05 ...

9得票2回答
在tidyverse r中,如何对虚拟码分类/序数变量进行编码?

假设我有一个tibble。 library(tidyverse) tib <- as.tibble(list(record = c(1:10), gender = as.factor(sample(c("M", "F"), 10, rep...

9得票2回答
使用 dplyr 在数据框的每一行上应用函数

在基于R的环境中,我会做如下操作: d <- data.frame(a = 1:4, b = 4:1, c = 2:5) apply(d, 1, which.max) 使用dplyr我可以做到以下操作: library(dplyr) d %>% mutate(u = pur...

9得票2回答
使用purrr对列表中每个数据框的单个列进行操作

我还在逐渐熟悉 purrr ,现在遇到一个我认为应该很简单的问题,但我不知道怎么做。我想要做的就是将下面的日期时间转换为日期格式并使用 as.Date()。这是一个数据框列表。一直在尝试中,但还没有找到可行的方法...感谢任何帮助。 df <- data.frame(Date = se...

9得票2回答
组合模糊匹配和精确匹配

我有两个包含地址信息的表格(街道、城市、邮编和两个字段,包含这些值的连接值),我想对邮编进行模糊匹配,但仅限于具有完全相同 StrCity 值的情况。我已经开始从字典中选择仅与 StrCity 匹配的地址,然后进行模糊匹配,但存在两个问题: 1)如果通过邮编匹配,则不考虑街道和城市 2)如果...

8得票1回答
在purrr::map()中使用dplyr::count()出错。

在这个例子中,我想对数据集中的每个字符变量应用count()函数。 library(dplyr) library(purrr) nycflights13::flights %>% select_if(is.character) %>% map(., coun...