Tidyverse 命令已被弃用:T test inside a summarize ,然后报告所有结果
Tidyverse commands are becoming deprecated: T test inside a summarise , then report all results
我几乎每天都使用 tidyverse(及其环境),而且有时我不得不回来进行 previous/old 分析。不幸的是,跟踪对包所做的更改并不容易。
这个脚本非常实用,它执行我想要的(它在一个函数中与其他命令一起使用)
ds <- data.frame(result = rnorm(100,5,2),
time = c("1","2"))
library(tidyverse)
library(broom)
ds %>%
summarise_at(vars("result"),
funs(list(tidy(t.test(. ~ time, paired=TRUE))))) %>% map(1)
我知道这不是最优雅的语法。现在,此消息出现在命令之后:
funs() 从 dplyr 0.8.0 开始被软弃用
请使用函数或 lambda 的列表:
# Simple named list:
list(mean = mean, median = median)
# Auto named with `tibble::lst()`:
tibble::lst(mean, median)
# Using lambdas
list(~ mean(., trim = .2), ~ median(., na.rm = TRUE))
我所有的修复尝试都给了我一条消息...
> ds %>%
+ summarise_at(vars("result"),
+ lst(tidy(t.test(. ~ time, paired=TRUE)))) %>% map(1)
Error in model.frame.default(formula = . ~ time) :
invalid type (list) for variable '.'
> ds %>%
+ summarise_at(vars("result"),
+ list(list(tidy(t.test(. ~ time, paired=TRUE))))) %>% map(1)
Error in model.frame.default(formula = . ~ time) :
invalid type (list) for variable '.'
> ds %>%
+ summarise_at(vars("result"),
+ list(list(tidy(~ t.test(. ~ time, paired=TRUE))))) %>% map(1)
Error: No tidy method for objects of class formula
所以.. 第一个问题:关于修复它的任何线索?
second:我在哪里可以关注这些(持续)更新?
三:我使用tidyverse是因为我喜欢它处理命令的方式。它非常直观,但我认为这是一个重要的副作用,它不断变化......我是否应该尝试将我的所有例程移至 R base(可能 R base 不会改变其功能......)?
谢谢大家
这个怎么样?
ds <- data.frame(result = rnorm(100,5,2),
time = c("1","2"))
library(tidyverse)
library(broom)
ds %>%
summarise_at(vars("result"),
list(~ list(tidy(t.test(. ~ time, paired=TRUE))))) %>% map(1)
#> $result
#> # A tibble: 1 x 8
#> estimate statistic p.value parameter conf.low conf.high method
#> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <chr>
#> 1 -0.719 -1.77 0.0823 49 -1.53 0.0955 Paire~
#> # ... with 1 more variable: alternative <chr>
由 reprex package (v0.3.0)
于 2019-09-04 创建
我几乎每天都使用 tidyverse(及其环境),而且有时我不得不回来进行 previous/old 分析。不幸的是,跟踪对包所做的更改并不容易。
这个脚本非常实用,它执行我想要的(它在一个函数中与其他命令一起使用)
ds <- data.frame(result = rnorm(100,5,2),
time = c("1","2"))
library(tidyverse)
library(broom)
ds %>%
summarise_at(vars("result"),
funs(list(tidy(t.test(. ~ time, paired=TRUE))))) %>% map(1)
我知道这不是最优雅的语法。现在,此消息出现在命令之后:
funs() 从 dplyr 0.8.0 开始被软弃用 请使用函数或 lambda 的列表:
# Simple named list:
list(mean = mean, median = median)
# Auto named with `tibble::lst()`:
tibble::lst(mean, median)
# Using lambdas
list(~ mean(., trim = .2), ~ median(., na.rm = TRUE))
我所有的修复尝试都给了我一条消息...
> ds %>%
+ summarise_at(vars("result"),
+ lst(tidy(t.test(. ~ time, paired=TRUE)))) %>% map(1)
Error in model.frame.default(formula = . ~ time) :
invalid type (list) for variable '.'
> ds %>%
+ summarise_at(vars("result"),
+ list(list(tidy(t.test(. ~ time, paired=TRUE))))) %>% map(1)
Error in model.frame.default(formula = . ~ time) :
invalid type (list) for variable '.'
> ds %>%
+ summarise_at(vars("result"),
+ list(list(tidy(~ t.test(. ~ time, paired=TRUE))))) %>% map(1)
Error: No tidy method for objects of class formula
所以.. 第一个问题:关于修复它的任何线索?
second:我在哪里可以关注这些(持续)更新?
三:我使用tidyverse是因为我喜欢它处理命令的方式。它非常直观,但我认为这是一个重要的副作用,它不断变化......我是否应该尝试将我的所有例程移至 R base(可能 R base 不会改变其功能......)?
谢谢大家
这个怎么样?
ds <- data.frame(result = rnorm(100,5,2),
time = c("1","2"))
library(tidyverse)
library(broom)
ds %>%
summarise_at(vars("result"),
list(~ list(tidy(t.test(. ~ time, paired=TRUE))))) %>% map(1)
#> $result
#> # A tibble: 1 x 8
#> estimate statistic p.value parameter conf.low conf.high method
#> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <chr>
#> 1 -0.719 -1.77 0.0823 49 -1.53 0.0955 Paire~
#> # ... with 1 more variable: alternative <chr>
由 reprex package (v0.3.0)
于 2019-09-04 创建