在编写一个用于计算满足方程的右三角数的小程序时，我偶然发现了一个页面，其中包含有关函数 Triangular() 的文档 Triangular function
当我尝试使用它时，Rstudio 说它找不到它，我似乎找不到任何关于它可能在哪个库中的其他信息。
这个函数是否存在和/或是否有其他方法可以用三角数填充向量？
【问题讨论】：
Zseq了吗？
f=function(n) n*(n+1)/2
标签： r statistics triangular
myTriangular <- function(n) choose(seq(n),2)
或
myTriangular <- function(n) cumsum(seq(n)-1)
这样
> myTriangular(10)
[1] 0 1 3 6 10 15 21 28 36 45
Triangular() 包中的 Zseq，请尝试Zseq::Triangular(10)
这样
> Zseq::Triangular(10)
Big Integer ('bigz') object of length 10:
[1] 0 1 3 6 10 15 21 28 36 45
【讨论】：
Zseq::Triangular 似乎能够处理超大数字，这对于基本 R 解决方案来说可能很难。
自己做很容易：
triangular <- function(n) sapply(1:n, function(x) sum(1:x))
所以你可以这样做：
triangular(10)
# [1] 1 3 6 10 15 21 28 36 45 55
【讨论】：