purrr相关内容

运行`map :: purrr()`函数后,用列名替换`.x`

我使用purrr:map()函数对数据集中的每一列运行lm(),其中一列作为因变量. 除此以外,结果几乎是完美的-我想用运行lm()的变量替换结果中的.x. 帖子 R purrr映射在输出中显示列名称是相关的,但我想避免创建一个函数. 下面是使用mtcars数据集的代码.我知道,例如,第一个输出的.x指的是$mpg.我不确定setNames()是否可以工作. library ..
发布时间:2020-05-05 13:37:16 其他开发

使用map()在lm中无法识别的因素

目标:我想使用map()函数来建立一个涉及分类变量的线性模型. 问题:我遇到以下错误,但我知道包含的类别变量,borrower_genders具有五个级别. Error in `contrasts ..
发布时间:2020-05-02 11:13:44 其他开发

提取模型摘要并将其存储为新列

我是purrr范式的新手,并且正在为此苦苦挣扎. 下面我设法设法嵌套一个数据框,对嵌套的数据运行线性模型,从每个lm提取一些系数,并为每个lm生成一个摘要.我想做的最后一件事是从摘要中提取"r.squared"(我本以为这是我要实现的最简单的部分),但是由于某种原因,我无法获得语法正确的. 以下是我所进行的工作的MWE: library(purrr) library(dplyr) ..
发布时间:2020-05-02 11:11:26 其他开发

使用update和purrr更新线性回归模型

我想在map调用中使用update函数更新lm模型,但这会引发以下错误: mtcars %>% group_by(cyl) %>% nest() %>% mutate(lm1 = map(data, ~lm(mpg ~ wt, data = .x)), lm2 = map(lm1, ~update(object = .x, formula = .~ . + hp)) ..
发布时间:2020-05-02 11:11:23 其他开发

如何创建列表列表,然后在列表上执行矢量化功能

我正在此请求中寻找两个特定的帮助点 1)如何在给定我的数据库(all.df)的情况下创建列表列表 2)如何在此列表清单上向量化功能 我正在尝试使用Prophet库在客户/产品级别生成预测. 我正在努力使操作向量化. 我目前正在运行for循环,我希望避免并加快计算速度. 分析数据 set.seed(1123) df1 ..
发布时间:2020-05-02 06:01:41 其他开发

遍历purrr中的公式

我想一堆使用一堆公式(例如字符串),最好一次使用tidyverse函数.这就是我现在的位置. library(tidyverse) library(broom) mtcars %>% dplyr::select(mpg:qsec) %>% colnames -> targcols paste('vs ~ ', targcols) -> formulas formulas #> 'vs ~ ..
发布时间:2020-04-30 12:29:42 其他开发

将跨数据帧的共享数据列中的多个值重新编码/替换为单个值

我希望我不会错过它,但是我一直无法找到解决该问题的可行方法. 我有一组带有共享列的数据框.这些列包含多个变化的转录错误,对于多个值,其中一些是共享的,而其他则不共享. 我想用所有数据帧中的正确值(good_values)替换/重新编码转录错误(bad_values). 我已经尝试在数据框,bad_values和good_values列表之间嵌套map*()函数系列,以实现此目的.这是一个示例 ..
发布时间:2020-04-27 05:11:59 其他开发

将计数添加到图例标签

我正在尝试将计数/百分比添加到饼图的图例标签中.饼图非常糟糕,我知道,但这不是本文的重点.我想将"Count"的值粘贴到图例上的"Wound.Type"标签上,但无法弄清楚如何为以下代码的每次迭代访问Counts.目标将是类似于"5级"的目标或其他任何数字.我已经尝试过“.〜Count"和“.〜Wound.Type",“.$ Count"和“.$ Wound.Type",但是我不知道如何访问我想要 ..
发布时间:2020-04-26 14:53:01 其他开发

管道如何与purrr map()函数和“。” (点)符号

当从purrr使用管道和map()函数时,我对数据和变量如何传递感到困惑。例如,这段代码可以像我期望的那样工作: library(tidyverse) cars%> % select_if(is.numeric)%>% map(〜hist(。)) 然而,当我使用ggplot进行类似的尝试时,它的表现方式很奇怪。 cars%>% select_if(i ..
发布时间:2018-04-24 21:37:01 其他开发

使用Purrr和Dplyr重新编码跨多个数据帧的类似因子级别

以下是两个简单的数据帧。我想重新编码(折叠) Sat1 和 Sat2 列,以便所有程度的满足都被编码简单作为满意,所有不满意度都被编码为不满意。中立将保持中立。因此,这些因素将有三个级别 - 满意,不满意和中性。 我通常会通过绑定数据框来实现这一点,并使用 lapply code> car package,如: DF1 [2:3] (DF1 [2:3],重新编码,c('“有点满意”= ..
发布时间:2017-07-13 22:41:12 其他开发语言

如何在列表中取得列表子集

我有几个股票的年度财务数据。我需要将其吹出来成为每月数据,感谢我以前问过的这个问题的答案,我有一个解决方案,涉及将日期列变成日期列表: 库(tidyverse) 库(lubridate) 因素。对于子集(子集)(list)(list( sec_id = c(1572L,1572L,1572L,1572L,1572L,1572L,1572L,1572L,1572L,1572L,1572L ..
发布时间:2017-07-13 22:25:13 其他开发语言