R 有没有办法浓缩这段代码？

有没有这样的方法来压缩代码？在这种情况下，B只是一个列向量，a只是一个标量值。我觉得好像Q1线假设你的A和B看起来像这样

A <- 10
B <- 1:5

---

我们使用

[-1]

删除初始

A

值。如果确实需要，您可以将它们包装在

matrix（）

调用中。

您可以尝试

cumprod

（使用@MrFlick的示例）

---

您应该在问题中提供

A

和

B

。@nrussel您是对的，这是一种不好的提问方式。您的问题的主题很好，您只需要提供一个完全重复的示例。

A <- 10
B <- 1:5

Reduce(function(a,b) a*(1+b), B, init=A, accumulate=T)[-1]
# [1]   20   60  240 1200 7200

A*cumprod(B+1)
#[1]   20   60  240 1200 7200