R中的求和更快的方法

【问题标题】：Summation in R quicker methodR中的求和更快的方法
【发布时间】：2021-07-04 21:01:13
【问题描述】：

我在 10.000/1/12^t = 56.502 中有一个从 i=1 到 10 的总和在 R 中：

n =10
t = seq(1,n,1);t
g = rep(0,n) 
r = 0.12
for (i in t) {
   g[i] = 10000/((1+r)^t[i])
   GPV = sum(g)
}
GPV

除了R中的for循环之外，还有更快的方法来计算这个总和吗？

【问题讨论】：

【解决方案1】：

试试这个

> n <- 10

> r <- 0.12

> sum(10000 / (1 + r)^seq(n))
[1] 56502.23

【讨论】：