Спроектируйте взвешенную двухрежимную сеть во втором режиме, используя tnet и projecting_tm
Я работаю с R tnet пакет и projecting_tm функция. Команда ниже проецирует (ненаправленную) взвешенную двухрежимную сеть на взвешенную однорежимную сеть для переменной i,
net.w <- cbind(
i=c(1,1,2,2,2,2,2,3,4,5,5,5,6),
p=c(7,8,7,8,9,10,11,7,8,9,10,11,7),
w=c(4,2,2,1,4,3,2,5,6,2,4,1,1))
projecting_tm(net.w)
Как я могу сделать эту проекцию для переменной p? Я ищу способ сделать это без простой реорганизации i а также p переменные.