r - reprex 显示正确的输出,但 rstudio 控制台显示错误
问题描述
library(tidyverse)
#> Warning: package 'tidyverse' was built under R version 3.6.3
#> Warning: package 'ggplot2' was built under R version 3.6.3
#> Warning: package 'tidyr' was built under R version 3.6.3
#> Warning: package 'purrr' was built under R version 3.6.3
#> Warning: package 'dplyr' was built under R version 3.6.3
#> Warning: package 'stringr' was built under R version 3.6.3
#> Warning: package 'forcats' was built under R version 3.6.3
mtcars = as_tibble(mtcars)
cars_nested = mtcars %>% group_by(cyl) %>% nest()
cars_fitted = cars_nested %>%
mutate(fit = map(data, function(x) lm(mpg ~ disp, data = x)))
由reprex 包(v0.3.0)于 2020 年 7 月 29 日创建
当我在 Rstudio 中运行此代码时,我收到以下错误。有什么帮助吗?
> mtcars = as_tibble(mtcars)
> cars_nested = mtcars %>% group_by(cyl) %>% nest()
> cars_fitted = cars_nested %>%
+ mutate(fit = map(data, function(x) lm(mpg ~ disp, data = x)))
Error: Problem with `mutate()` input `fit`.
x object 'disp' not found
i Input `fit` is `map(data, function(x) lm(mpg ~ disp, data = x))`.
i The error occured in group 1: cyl = 4.
Run `rlang::last_error()` to see where the error occurred. ```
解决方案
感谢您的建议。我找到了为什么会收到这些错误。在前面的代码中,我在不知不觉中将 mtcars 嵌套到了同一个 mtcars 数据集。所以只有 cyl 和 data 列。这就是我得到错误的原因。
推荐阅读
- python - 查找可以打开特定类型文件的可用应用程序列表?
- ios - 如何在 Swift 包管理器中更改库的版本?
- react-native - 是否有任何信息或链接清楚地涵盖了 react native 中的贝宝集成?
- azure - 将本地 asp.net 核心 Web 应用程序发布到 azure 应用程序服务
- sql - IDENTITY SEED 基于其他表种子值递增
- php - 加速 PHP 脚本
- javascript - 映射数组内的增量值
- reactjs - 有没有更好的方法来设置函数来响应钩子useState?
- javascript - 如何在反应js中单独编辑多个文本输入编辑器字段
- javascript - Char 是 UTF 但我仍然看到加密的字母