首页
学习
活动
专区
圈层
工具
发布
首页
学习
活动
专区
圈层
工具
MCP广场
社区首页 >问答首页 >在一个范围内匹配两个向量中的元素

在一个范围内匹配两个向量中的元素
EN

Stack Overflow用户
提问于 2017-09-28 03:11:44
回答 3查看 45关注 0票数 0

我有以下向量的这种类型的数据。

代码语言:javascript
运行
复制
v1 <- c(15, 20, 30, 45)
v2 <- c(17, 23, 30, 55)

我希望仅当元素落入v1中的某个元素范围内时,才匹配每个元素。我的代码是:

代码语言:javascript
运行
复制
ifelse(v1>v2-5, match(v1, v2), 0)

我想要的输出是:[1] 1 2 3 0

相反,我得到的是:[1] NA NA 3 0

为什么前两个元素不匹配?

EN

回答 3

Stack Overflow用户

发布于 2017-09-28 03:21:57

第三个值是v1中唯一与v2匹配的元素,因此即使满足您的条件,也可以为其他元素获取NAifelse()将为返回条件的TRUE值的元素插入下列值:

代码语言:javascript
运行
复制
match(v1, v2)[v1 > v2 - 5]
# [1] NA NA  3

您可以尝试在那里使用序列:

代码语言:javascript
运行
复制
ifelse(v1 > v2 - 5, seq_along(v1), 0)
# [1] 1 2 3 0
票数 1
EN

Stack Overflow用户

发布于 2017-09-28 03:22:46

也许你在找findInterval

代码语言:javascript
运行
复制
findInterval(v1, c(0, v2))
#[1] 1 2 4 4

结果的第三个值错误,因此必须将参数left.open设置为TRUE

代码语言:javascript
运行
复制
findInterval(v1, c(0, v2), left.open = TRUE)
#[1] 1 2 3 4

ifelse(v1 > v2 - 5, findInterval(v1, c(0, v2), left.open = TRUE), 0)
#[1] 1 2 3 0
票数 1
EN

Stack Overflow用户

发布于 2017-09-28 03:23:17

代码语言:javascript
运行
复制
sapply(v1, function(x){
    temp = which(v2 >= x & abs(v2 - x) < 5)[1]
    replace(temp, is.na(temp), 0)
})
#[1] 1 2 3 0
票数 0
EN
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接:

https://stackoverflow.com/questions/46455559

复制
相关文章

相似问题

领券
问题归档专栏文章快讯文章归档关键词归档开发者手册归档开发者手册 Section 归档