在R中分割数值向量

Question

如果我有一个向量c（1,2,3,5,7,9,10,12）...和另一个向量c（3,7,10），我将如何产生以下结果：

[[1]]
1,2,3

[[2]]
5,7

[[3]]
9,10

[[4]]
12

请注意3 7和10如何成为每个列表元素的最后一个数字（最后一个除外）。 或某种意义上的“断点”。 我确定有一个我不了解或内存不足的简单R函数。

Answer 1

这是使用cut和split的一种方法：

split(x, cut(x, c(-Inf, y, Inf)))
#$`(-Inf,3]`
#[1] 1 2 3
#
#$`(3,7]`
#[1] 5 7
#
#$`(7,10]`
#[1]  9 10
#
#$`(10, Inf]`
#[1] 12

Answer 2

能做

split(x, cut(x, unique(c(y, range(x)))))

## $`[1,3]`
## [1] 1 2 3

## $`(3,7]`
## [1] 5 7

## $`(7,10]`
## [1]  9 10

## $`(10,12]`
## [1] 12

Answer 3

类似于@beginneR的答案，但使用findInterval而不是cut

split(x, findInterval(x, y + 1))
# $`0`
# [1] 1 2 3
# 
# $`1`
# [1] 5 7
# 
# $`2`
# [1]  9 10
# 
# $`3`
# [1] 12