gpt4 book ai didi

r - tidyverse 中的函数

转载 作者:行者123 更新时间:2023-12-04 11:48:35 26 4
gpt4 key购买 nike

我想创建具有中间函数的 tidyverse。我有一个结构

temp1 = sapply(df, function(x) .....)
temp2 = sapply(temp1, function(x) .......... )
temp3 = sapply(df, function(x) ..........)
temp = data.frame(temp2/temp3)

我想得到这样的东西

sapply(df, function(x) .......) %>% sapply(df, function(x) ....... )
%>% ......

可重现的例子:

df = data.frame(a = c(1,2,3), b = c(1,2,3))
temp1 = sapply(df, function(x) x*3)
temp2 = sapply(temp1, function(x) x+4 )
temp3 = sapply(df, function(x) x/4)
temp = data.frame(temp2/temp3)

最佳答案

假设您要在每一列上执行比显示的更复杂的函数,您可以使用 purrr 函数,例如:

library(purrr)

map2_df(map(df, ~.x * 3 + 4), map(df, ~.x/4), `/`)

# a b
# <dbl> <dbl>
#1 28 28
#2 20 20
#3 17.3 17.3

关于r - tidyverse 中的函数,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/58214895/

26 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com