首页
学习
活动
专区
圈层
工具
发布
首页
学习
活动
专区
圈层
工具
MCP广场
社区首页 >问答首页 >如何找到仅适用于某些顶点的邻域?

如何找到仅适用于某些顶点的邻域?
EN

Stack Overflow用户
提问于 2019-05-31 10:01:00
回答 1查看 119关注 0票数 1

这个问题是here开始的。

我有一个无向图gn<100顶点。图很简单。所有顶点的坐标都是整数(x_i, y_i), i=1, 2,..., n,边集是预先定义的,它们是具有长度1单位的线段。顶点的程度可以是234

代码语言:javascript
运行
复制
library(igraph)

g <- graph_from_literal(1-2-3-4-5-6-7-8-1, 8-9-4)
B <- t(matrix(c(0,0, 0,1, 0,2, -1,2, -2,2, -2,1, -2,0, -1,0, -1,1), nrow =2));

V(g)$id <- seq_len(vcount(g))

V(g)$x <- B[,1]; V(g)$y <- B[,2]

plot(g, layout=as.matrix(B))

我需要为顶点设置新属性-- corner属性。

如果顶点i的度为2,且两个入射边不在同一条线上,则它就是corner顶点。在上面的图中,顶点1, 3, 5, 7是角点,而剩余顶点2, 4, 6, 8, 9是非角点。

我的尝试

我已经找到了度等于2的顶点列表。

代码语言:javascript
运行
复制
idv <- V(g)[strength(g)==2]; idv # 1 2 3 5 6 7 9

然后给出了i-th顶点的邻域顶点列表。

代码语言:javascript
运行
复制
neigh<-neighborhood(g, idv); neigh

错误就在这里,因为我看到了所有顶点的邻域顶点,不只是度等于2的顶点。例如,

代码语言:javascript
运行
复制
neigh[[4]]; neigh[[8]];   
#[1] 4 3 5 9
#[1] 8 1 7 9

问题:如何使用neighborhood函数为只有度2的顶点找到邻域?

EN

回答 1

Stack Overflow用户

回答已采纳

发布于 2019-05-31 10:22:26

这个函数是正确的,但是第二个论点不是关于兴趣点,而是第三个:

代码语言:javascript
运行
复制
neighborhood
# function (graph, order = 1, nodes = V(graph), mode = c("all", 
#     "out", "in"), mindist = 0) 
# {
# ...

因此,

代码语言:javascript
运行
复制
length(neighborhood(g, nodes = idv))
# [1] 7

做这份工作。

票数 1
EN
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接:

https://stackoverflow.com/questions/56392883

复制
相关文章

相似问题

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