r - 有没有更好的方法将向量的每个元素与一组定义的间隔相匹配？

Question

我有一组定义的间隔，我需要根据向量所在的间隔对向量的每个元素进行分类。这是一个例子。因为我的数据会非常大，我想知道是否有更有效的方法来做到这一点。

library(dplyr)
Intrevals <- data.frame(start = c( 3, 6, 10, 58, 78), end = c(4, 8, 46, 68, 84 ), catg = c("F", "R", "O", "S", "X"))
x = data.frame( unit = c(1:100), value = sample(1:84, 100, replace = TRUE))
E = x %>%
  tidyr::crossing(Intrevals) %>%
  dplyr::mutate(flag = ifelse((value >= start) & (value < end), 1, 0)) %>%
  dplyr::filter(flag == 1)

感谢您的任何建议。

Answer 1

您可以使用 cut 在基础 R 中执行此操作.由于您的 sample语句生成的值超出范围，我对其进行了修改，以便所有值都在其中一个范围内。

Intervals <- data.frame(start = c( 3, 6, 10, 58, 78), 
    end = c(4, 8, 46, 68, 84 ), 
    catg = c("F", "R", "O", "S", "X"))
x = data.frame( unit = c(1:100), value = sample(3:84, 100, replace = TRUE))
B = c(Intervals$start[1], Intervals$end)
cut(x$value, breaks=B, labels=Intervals$catg, include.lowest=T)

  [1] X O O O X S O O O O S X X O O X O O O O S O O O O O O S X R X O R S O S S S O
 [40] X O X R S O S S F O X X O S S F S O O X O S O S O O O O F S O O O O O O O S X
 [79] S O O S X X X F O X X O O R O X O O O X X S
Levels: F R O S X