2

我是 R 的新用户。如何检查向量的哪些元素位于向量A的元素之间B，例如：

    A = c(1.1, 3.2, 5, 8.5, 4.6, 2.2)
    B = c(1, 2, 3)

表示 which elements ofA介于 1 和 2 之间，那么 which elemets ofA介于 2 和 3 之间？

4

4 回答 4

3

你想要一些变体findInterval

findInterval(A,B)
[1] 1 3 3 3 3 2

值 1 表示它介于 1 和 2 之间（B 中的最低值和次低值） 值 2 表示它介于 2 和 3 之间

所以要找到介于两者之间的

which(findInterval(A,B) %in% seq_len(length(unique(B))-1))
# [1] 1 6

并从中提取A

A[findInterval(A,B) %in% seq_len(length(unique(B))-1)]

# [1] 1.1 2.2

您也可以使用cut，这将创建一个因素。

结合split这将给

 split(A, cut(A,B),drop=FALSE)
$`(1,2]`
[1] 1.1

$`(2,3]`
[1] 2.2
于 2013-04-04T04:10:25.653 回答
1

如果我理解正确，这是一种可能性：

A = c(1.1, 3.2, 5, 8.5, 4.6, 2.2)
B = c(1, 2, 3,4,10)

B1 <- head(B, -1)
B2 <- tail(B, -1)

outs <- list()

for(i in seq_along(B1)) {
    outs[[i]] <- A[B1[i] < A & A < B2[i]]
}

names(outs) <- paste(B1, " & ", B2)

## > outs
## $`1  &  2`
## [1] 1.1
## 
## $`2  &  3`
## [1] 2.2
## 
## $`3  &  4`
## [1] 3.2
## 
## $`4  &  10`
## [1] 5.0 8.5 4.6
于 2013-04-04T04:10:52.173 回答
1

我假设它将是 B 中的连续数字，您将对其进行检查

result.pair<-matrix(rep(integer(), 3), ncol = 3)
colnames(result.pair)<-c("B1", "A", "B2")
for(i in 1:(length(B)))
{
  for(j in 1:(length(A)))
  {
    if ((B[i] <= A[j])  & (B[i+1] >= A[j]))
    {
      result.pair<-rbind(result.pair, c(B[i], A[j], B[i+1]))
    }
  }

}

result.pair
于 2013-04-04T04:27:29.423 回答
0

试试这个：

      data.frame(A,cut(A,B))

对于 A 中的每个观察，它会告诉您它位于哪对 B 观察之间。

像这样：

> data.frame(A,cut(A,B))
    A cut.A..B.
1 1.1     (1,2]
2 3.2      <NA>
3 5.0      <NA>
4 8.5      <NA>
5 4.6      <NA>
6 2.2     (2,3]

NA 表示它不在两个 B 观测值之间。

也试试：

data.frame(A,cut(A,c(-Inf,B,Inf)))
于 2013-04-04T06:01:53.327 回答