如何获取包含两个其他值之间的值的数据帧的行？

Question

So I want to find values in a column of a data.frame, which are in range of defined values:

  example
 [1] 6 2 4 3 5 1
 pos
 [1] 1 3 2

I now want to get the values of example for which BOTH of the following statements are TRUE, so that I got only values that lie between pos - 1 and pos +1 :

if(example < pos - 1)
if(example > pos + 1)

And now the real values for my task are within a data.frame. How do I extract the complete rows, which contain these values and build a new pos data.frame .

The expected output for the example would be:

result
[1] 2 3 1

Thanks in advance!

Answer 1

Set min and max thresholds and then compare each element against them

maxind <- max(pos + 1)
minind <- min(pos - 1)

Then

example[sapply(example, function(x) x > minind & x < maxind)]
## [1] 2 3 1

Or, similarly

example[example > minind & example < maxind]
## [1] 2 3 1

Or using data.table

library(data.table)
example[between(example, minind, maxind, incbounds = FALSE)]
## [1] 2 3 1

Answer 2

So the solution as suggested by @David Arenburg is like this:

indx <- sapply(example[, 4], function(x) any(x < pos + 1) & any(x > pos - 1)) 

Then just do

example[indx,]

This will search a data.frame in the specified column for values that are in the defined range and will just give you the rows of your desire!