假设我有一个向量v = c(250,1200,700)
、一个起始值n
和一个函数,例如
f = function(v){
g = function(v){
cases(
v <= 20 -> 0.1,
v > 20 & v <= 100 -> 0.075,
v > 100 -> .05
)
}
suppressWarnings(g(v))
}
f
是使用包中编写cases
的memisc
——我对 R 还是新手,很想知道是否f
可以用“更好”的方式进行编码。无论如何,我正在寻找将执行以下递归过程的代码(包括“大”长度的向量):
f(n),
f(n)*v[1]+n,
f(f(n)*v[1]+n)*v[2] + f(n)*v[1]+n,
f(f(f(n)*v[1]+n)*v[2] + f(n)*v[1]+n)*v[3] + f(f(n)*v[1]+n)*v[2] + f(n)*v[1]+n
最终我对最后一行的价值感兴趣。
为任何帮助而欢呼