使用多個起始值迭代功能

Question

我編寫了一個函數，該函數使用一個數字，x和代碼的迭代次數作為參數，我需要使用一個循環來生成代碼（可能是一個全新的函數？），該循環會生成序列的前10個值每個值分別為1，2，3，。 。 。 ，20。

x=1:20
for (elm in x)
  sequences=dprodseq(elm)
sequences

> sequences
 [1]  20  22  26  38  62  74 102 104 108 122 122

僅從向量中的最后一個元素開始。

如何使代碼從向量中的每個元素運行函數？

Answer 1

您可能需要初始化對象“序列”。 在這里，我將“序列”創建為長度等於“ x”長度的list

sequences <- vector('list', length(x))
for(i in seq_along(x)){
    sequences[[i]] <- dprodseq(x[i])
}