如何从R中的向量创建一组范围？

Question

假设我有一个指定长度的数字向量。

x = c(3,5,4,10)

然后我跑累积量来得到他们的射程。

cumsum(x)

3  8 12 22

从1开始，我将如何对每对进行配对以生成对范围。

作为字符向量比较可取：

c("1-3", "3-8", "8-12", "12-22")

Answer 1

您可以像这样使用paste：

paste(c(1, cumsum(x))[-(length(x)+1)], cumsum(x), sep = "-")
# [1] "1-3"   "3-8"   "8-12"  "12-22"

Answer 2

另一种选择是使用sprintf

 x1 <- c(1, cumsum(x))
 sprintf('%d-%d', x1[-length(x1)], x1[-1])
 #[1] "1-3"   "3-8"   "8-12"  "12-22"