我正在尝试使用purrr::map创建lm对象列表。 以mtcars为例： vars <- c('hp', 'wt', 'disp') map(vars, ~lm(mpg~.x, data=mtcars)) 错误： 在模型框架默认值(formula = mpg ~ .x, ...

请看这个简单的数据集和函数(代表着更复杂的问题): x <- data.frame(a = 1:3, b = 2:4) mult <- function(a,b,n) (a + b) * n 使用基本R的Map函数，我可以以矢量化的方式添加两列新列： ns <- 1:...

我有一个数据框，结构类似于以下内容： set.seed(123) df<-data_frame(SectionName = rep(letters[1:2], 50), TimeSpentSeconds = sample(0:360, 100, rep...

我有一个简单的问题，希望你们这些 purrr 专家能够帮忙解决，这个问题已经让我在谷歌上搜索了很长时间。首先，让我们来看一下我正在尝试处理的嵌套列表数据结构。 加载包 #R version 3.4.1 library(purrr) # version 0.2.4 library(d...

我的简单问题是：如何对两个数据框的每一列进行ks.test测试？ 例如，我们有两个数据框： D1 <- data.frame(D$Ag, D$Al, D$As, D$Ba, D$Be, D$Ca, D$Cd, D$Co, D$Cu, D$Cr) D2 <- data.frame...

背景 我有一个问题，可能有很多解决方案，但我相信还有一种未被发现的优雅解决方案可以利用purrr。 示例代码 我有一个大型数据框，如下所示，以下是一个示例： library(tibble) library(ggmap) library(purrr) library(dplyr) # ...

df %>% split(.$x) 对于大量唯一的x值，数据框架变得缓慢。相反，如果我们手动将数据框架拆分成较小的子集，然后对每个子集执行分割，我们可以将时间至少降低一个数量级。 library(dplyr) library(microbenchmark) library(care...

我正在寻找将数据框列表中的列名和数据框名称合并为一个数据框的方法。它们的列长度不相等。怎样做最好？ dlist <- list(mtcars[1:2], mtcars[1:3], mtcars[1:4]) names(dlist) <- c("mtcars1", "mtcars2...

我想使用 dplyr::coalesce 函数，在包含多对变量的数据框中找到每一对变量中第一个非缺失值。目标是创建一个新的数据框，其中每一对变量只有一份副本（一个不包含NA值的 coalesce 变量）。 以下是示例： df <- data.frame( A_1=c(NA...

当同时使用管道和purrr中的map()函数时，我对数据和变量是如何传递的感到困惑。例如，以下代码按照我的预期工作： library(tidyverse) cars %>% select_if(is.numeric) %>% map(~hist(.)) 然而，当...