R中求和更快的方法
Summation in R quicker method
我在 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 循环更快的方法来计算这个总和？
试试这个
> n <- 10
> r <- 0.12
> sum(10000 / (1 + r)^seq(n))
[1] 56502.23
我在 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 循环更快的方法来计算这个总和？
试试这个
> n <- 10
> r <- 0.12
> sum(10000 / (1 + r)^seq(n))
[1] 56502.23