r - 动态累积乘积/倍数

Question

假设我有一个向量x：

x <- c(X1, X2, X3, ..., Xn)

我想编写一个自动获取结果系列的函数，如下所示：

y <- c(X1, X1*X2, X1*X2*X3, ..., X1*X2*X3*...*Xn)

有人可以告诉我如何在 R 中执行此操作吗？

Answer 1

看看?cumprod：

 cumprod(1:10)
 # [1]       1       2       6      24     120     720    5040   40320  362880 3628800