朱莉娅 - 相当于R中的递归sapply函数

Question

我在R（onestep下面）中有一个函数，它将一个向量作为参数v，并返回一个新的向量v作为输出，它是输入向量的函数。然后我迭代这个功能niter倍，并保持每次迭代的输出向量（其不是所有具有相同的长度，并且可以偶尔也结束了具有长度为0）的另一功能iterate如下（最小示例）：

onestep = function (v) c(v,2*v) 
iterate = function (v, niter) sapply(1:niter, function (iter) {v <<- onestep(v) 
                   return(v) }) 

例子：

v=c(1,2,3) 
iterate(v,3) 

[[1]] 
[1] 1 2 3 2 4 6 

[[2]] 
[1] 1 2 3 2 4 6 2 4 6 4 8 12 

[[3]] 
[1] 1 2 3 2 4 6 2 4 6 4 8 12 2 4 6 4 8 12 4 8 12 8 16 24 

我想知道什么是做一个返回朱莉娅所有的中间结果这样的递归函数的紧凑和惯用的方法是什么？有什么想法吗？ （道歉，如果这是微不足道的，但我是新来的朱莉娅）

Answer 1

的紧凑和惯用前不知道，但这是我怎么会做它

onestep(v) = [v 2*v] 

function iterate(v, niter) 
    Results = Array(Array, niter) 
    Results[1] = onestep(v) 
    for idx = 2:niter 
     Results[idx] = onestep(Results[idx - 1]) 
    end 
    Results 
end 

v = [1 2 3] 
iterate(v, 3) 

Answer 2

这里是另一种方式就是有点更简洁和更真实的递归，根据您的原始问题：

v = Array[[1, 2, 3]] ## create v as an array of one dimensional arrays 
function iterate(v::Array{Array, 1}, niter::Int) 
    niter == 0 && return v[2:end] 
    push!(v, [v[end] ; 2v[end]]) 
    niter -= 1 
    iterate(v, niter) 
end 

iterate(v, 3)