r - 几何级数中的数字

Question

如何生成 R 中几何级数的数字序列？例如我需要生成序列:
1, 2,4,8,16,32 等等......直到说一个有限值？

Answer 1

这是我要做的:

geomSeries <- function(base, max) {
    base^(0:floor(log(max, base)))
}

geomSeries(base=2, max=2000)
# [1]    1    2    4    8   16   32   64  128  256  512 1024

geomSeries(3, 100)
# [1]  1  3  9 27 81