r - 多个范围的子集

This question already has answers here:

Efficient way to filter one data frame by ranges in another

(3 个回答)

4年前关闭。

我想获得一个介于多个范围之间的值列表。

library(data.table)
values <- data.table(value = c(1:100))
range <-  data.table(start = c(6, 29, 87), end = c(10, 35, 92))

我需要的结果只包括落在这些范围之间的值:

 results <- c(6, 7, 8, 9, 10, 29, 30, 31, 32, 33, 34, 35, 87, 88, 89, 90, 91, 92)

我目前正在使用 for 循环执行此操作，

results <- data.table(NULL)
for (i in 1:NROW(range){ 
          results <- rbind(results, 
              data.table(result = values[value >= range[i, start] & 
                 value <= range[i, end], value]))}

但是实际数据集非常大，我正在寻找一种更有效的方法。

任何建议表示赞赏!谢谢!

最佳答案

使用 data.table 的 non-equi join 可能性:

values[range, on = .(value >= start, value <= end), .(results = x.value)]

这使:

    results
 1:       6
 2:       7
 3:       8
 4:       9
 5:      10
 6:      29
 7:      30
 8:      31
 9:      32
10:      33
11:      34
12:      35
13:      87
14:      88
15:      89
16:      90
17:      91
18:      92

或者按照@Henrik 的建议: values[value %inrange% range] 。这也适用于具有多列的 data.table:

# create new data
set.seed(26042017)
values2 <- data.table(value = c(1:100), let = sample(letters, 100, TRUE), num = sample(100))

> values2[value %inrange% range]
    value let num
 1:     6   v  70
 2:     7   f  77
 3:     8   u  21
 4:     9   x  66
 5:    10   g  58
 6:    29   f   7
 7:    30   w  48
 8:    31   c  50
 9:    32   e   5
10:    33   c   8
11:    34   y  19
12:    35   s  97
13:    87   j  80
14:    88   o   4
15:    89   h  65
16:    90   c  94
17:    91   k  22
18:    92   g  46

关于r - 多个范围的子集，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/43641874/

上一篇：google-calendar-api - Google Calendar API 查看/编辑房间/资源？

下一篇：cordova - 如何在phonegap中循环音频？

相关文章：

windows - 如何绕过权限被拒绝错误？

将字符串验证为整数范围的 Grails 最佳实践

R data.table 条件在组内，但在组中的第一个实例中记录

r - `spread= a - b` 用 `dplyr` 和 `data.table` 计算 tall 数据

for-loop - 为什么我需要对我的 go 例程/ channel 的结果进行额外的 for 循环以显示所有结果？

r - 在 data.table 中使用 na.locf 函数(zoo 包)和 .SD

r - 在 Shiny 模块中使用模态窗口

r - 在 R 中的映射函数中添加到列表对象

r - 在 R 中跳过 read.csv 中的一些行

ruby - ruby 中的数组和范围有什么区别？