сравнить 2 подграфа с расстояниями Хэмминга в R

#r #igraph #hamming-distance #sna

#r #igraph #расстояние Хэмминга #sna

Вопрос:

Я создал график (igraph) из данных интервью. Я хотел бы сравнить подграфы каждого интервью, чтобы иметь относительное расстояние от каждого из них. Я обнаружил, что могу использовать расстояние Хэмминга. Существует множество пакетов, которые предлагают функции для вычисления расстояния. Но я не могу понять, как рассчитать расстояние между каждым подграфом.

В качестве примера :

 library(igraph)
g1 <- graph_from_literal(1-2-3-4-1, 2-5-4, 1-5)
V(g1)$interview <- 1
g2 <- graph_from_literal(6-7-9,8-4-2-10,1-10-9)
V(g2)$interview <- 2
big.g <- g1   g2
set.seed(1234)
plot(big.g)
  

Я хотел бы знать, как далеко g1 (от интервью 1) до g2 . Своего рода индекс сходства или различия. Расстояния Хэмминга кажутся способом, но я не знаю, как с этим бороться…

Комментарии:

1. Можете ли вы дать нам небольшой макет, чтобы продемонстрировать вашу проблему воспроизводимым способом?

2. @AllanCameron что касается примера, я пытался использовать sna::hdist() , но мне нужно иметь одинаковое измерение для g1 и g2 . это редко бывает

Ответ №1:

Я нашел решение отсюда

 int <- graph.intersection(g1,g2)
n.dist <- ecount(g1) ecount(g2)-2*ecount(int)
n.dist

##14  <- result