- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
我有一个看起来像这样的数据集
target.id source.id connected
1 1 0
2 1 0
3 1 0
4 1 0
5 1 0
6 1 0
1 2 1
2 2 0
3 2 1
基本上我有源位置、目标位置以及它们是否连接。这里的连接是定向的,例如,位置 1 可以连接到位置 8,而位置 8 不连接到位置 1(想想航空公司的航类,亚特兰蒂斯可以向火星发送航类,而火星可能不会向亚特兰蒂斯发送航类,这意味着亚特兰蒂斯连接到火星,火星不连接到亚特兰蒂斯)。
我需要确定一组“完全”连接的位置,其中所有观察结果都是彼此的来源和目标。考虑到我有 75 个位置,我需要成对地进行,3 乘 3,直到可行为止。示例输出是,对于 3 x 3,位置 3、5 和 8 是彼此的源和目标。
我试图解决这个问题的方法是获取 1:length(unique(target.id))
2 乘 2、3 乘 3,直到 8 乘 8(8 乘 8)的所有排列将是我要查看的最大集)然后相交
所有这些。
但是,显然,这太慢了。有更好的方法吗?
最佳答案
听起来你想要一个有向图中所有大小为 2 到 8 的派系,其中节点是你的 ID,当源 -> 目的地在你的数据集中被标记为连接时存在边。第一步是只过滤连接的边缘,产生类似于以下示例数据的内容:
(filtered <- data.frame(source.id = c(1, 1, 2, 2, 3, 3, 3, 4, 4), target.id = c(2, 3, 1, 3, 1, 2, 4, 3, 5), connected = 1))
# source.id target.id connected
# 1 1 2 1
# 2 1 3 1
# 3 2 1 1
# 4 2 3 1
# 5 3 1 1
# 6 3 2 1
# 7 3 4 1
# 8 4 3 1
# 9 4 5 1
接下来,您可以将数据限制为双向连接的 id 对:
(bidir <- filtered[duplicated(paste(pmin(filtered$source.id, filtered$target.id),
pmax(filtered$source.id, filtered$target.id))),])
# source.id target.id connected
# 3 2 1 1
# 5 3 1 1
# 6 3 2 1
# 8 4 3 1
在此示例数据中,大小为 2 的团为 (1, 2)、(1, 3)、(2, 3) 和 (3, 4),大小为 3 的团为 (1, 2 , 3). igraph 包在“接近最佳时间”计算这些:
library(igraph)
g <- graph.data.frame(bidir, directed=FALSE)
cliques(g, min=2, max=8)
# [[1]]
# + 2/4 vertices, named:
# [1] 2 3
#
# [[2]]
# + 2/4 vertices, named:
# [1] 2 1
#
# [[3]]
# + 2/4 vertices, named:
# [1] 3 4
#
# [[4]]
# + 2/4 vertices, named:
# [1] 3 1
#
# [[5]]
# + 3/4 vertices, named:
# [1] 2 3 1
关于r - 获取所有观察组合的集合之间的交集,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/43945252/
我需要您在以下方面提供帮助。近一个月来,我一直在阅读有关任务和异步的内容。 我想尝试在一个简单的 wep api 项目中实现我新获得的知识。我有以下方法,并且它们都按预期工作: public Htt
我的可执行 jar 中有一个模板文件 (.xls)。不需要在运行时我需要为这个文件创建 100 多个副本(稍后将唯一地附加)。用于获取 jar 文件中的资源 (template.xls)。我正在使用
我在查看网站的模型代码时对原型(prototype)有疑问。我知道这对 Javascript 中的继承很有用。 在这个例子中... define([], function () { "use
影响我性能的前三项操作是: 获取滚动条 获取偏移高度 Ext.getStyle 为了解释我的应用程序中发生了什么:我有一个网格,其中有一列在每个单元格中呈现网格。当我几乎对网格的内容做任何事情时,它运
我正在使用以下函数来获取 URL 参数。 function gup(name, url) { name = name.replace(/[\[]/, '\\\[').replace(/[\]]/,
我最近一直在使用 sysctl 来做很多事情,现在我使用 HW_MACHINE_ARCH 变量。我正在使用以下代码。请注意,当我尝试获取其他变量 HW_MACHINE 时,此代码可以完美运行。我还认为
关闭。这个问题不符合Stack Overflow guidelines .它目前不接受答案。 关闭 9 年前。 要求提供代码的问题必须表现出对所解决问题的最低限度的理解。包括尝试过的解决方案、为什么
由于使用 main-bower-files 作为使用 Gulp 的编译任务的一部分,我无法使用 node_modules 中的 webpack 来require 模块code> dir 因为我会弄乱当
关闭。这个问题需要更多focused .它目前不接受答案。 想改进这个问题吗? 更新问题,使其只关注一个问题 editing this post . 关闭 5 年前。 Improve this qu
我使用 Gridlayout 在一行中放置 4 个元素。首先,我有一个 JPanel,一切正常。对于行数变大并且我必须能够向下滚动的情况,我对其进行了一些更改。现在我的 JPanel 上添加了一个 J
由于以下原因,我想将 VolumeId 的值保存在变量中: #!/usr/bin/env python import boto3 import json import argparse import
我正在将 MSAL 版本 1.x 更新为 MSAL-browser 的 Angular 。所以我正在尝试从版本 1.x 迁移到 2.X.I 能够成功替换代码并且工作正常。但是我遇到了 acquireT
我知道有很多关于此的问题,例如 Getting daily averages with pandas和 How get monthly mean in pandas using groupby但我遇到
This is the query string that I am receiving in URL. Output url: /demo/analysis/test?startDate=Sat+
我正在尝试使用 javascript 中的以下代码访问 Geoserver 层 var gkvrtWmsSource =new ol.source.ImageWMS({ u
API 需要一个包含授权代码的 header 。这就是我到目前为止所拥有的: var fullUrl = 'https://api.ecobee.com/1/thermostat?json=\{"s
如何获取文件中的最后一个字符,如果是某个字符,则删除它而不将整个文件加载到内存中? 这就是我目前所拥有的。 using (var fileStream = new FileStream("file.t
我是这个社区的新手,想出了我的第一个问题。 我正在使用 JSP,我成功地创建了 JSP-Sites,它正在使用jsp:setParameter 和 jsp:getParameter 具有单个字符串。
在回答 StoreStore reordering happens when compiling C++ for x86 @Peter Cordes 写过 For Acquire/Release se
我有一个函数,我们将其命名为 X1,它返回变量 Y。该函数在操作 .on("focusout", X1) 中使用。如何获取变量Y?执行.on后X1的结果? 最佳答案 您可以更改 Y 的范围以使其位于函
我是一名优秀的程序员,十分优秀!