我想重复应用一个函数,它需要两个参数到一个列表,使用第一次调用的结果和第二次调用的第三个参数等等。
例如,如果列表有 4 个元素,并且给定一个函数 f,我希望结果是f(f(f(1,2),3),4)
. 有这样的功能吗?
一个例子是有一个数据框列表,它们都应该合并到一个特定的列上。
我想重复应用一个函数,它需要两个参数到一个列表,使用第一次调用的结果和第二次调用的第三个参数等等。
例如,如果列表有 4 个元素,并且给定一个函数 f,我希望结果是f(f(f(1,2),3),4)
. 有这样的功能吗?
一个例子是有一个数据框列表,它们都应该合并到一个特定的列上。
递归调用函数的一种方法是使用Reduce
. 来自?Reduce
:
'Reduce' 使用二元函数来连续组合给定向量的元素和可能给定的初始值。
您可以从这样的列表中合并几个 data.frame:
# some dummy data
a <- list(data.frame(a=1:10, b=rnorm(10)), data.frame(a=1:10, b=rnorm(10)), data.frame(a=1:10, b=rnorm(10)))
Reduce(function(u, v) cbind(u, v$b) , a)
a b v$b v$b
1 1 -1.2968741 -0.4186869 0.29888504
2 2 -0.2680551 0.3315939 2.05348116
3 3 -0.5188585 0.5125005 1.95103927
4 4 -0.7447659 -1.2982199 0.80582874
5 5 0.2391337 -0.6818633 -0.75994882
6 6 -0.6391927 0.3584701 1.50356731
7 7 1.0117809 -0.1060888 0.07402643
8 8 -1.8877719 -0.4380313 0.49141877
9 9 -0.7392668 1.1527095 1.40168828
10 10 -1.0318087 0.1889492 1.39867700