Я только недавно начал изучать сетевой код, используя материал и данные Огняновой, найденные по адресу: http://www.kateto.net/wp-content/uploads/2015/06/Polnet%202015%20Network%20Viz%20Tutorial%20-%20Ognyanova.pdf
, руководствуясь некоторыми кодами в документе, я пытаюсь назначить цвета ребер, а затемтип линии края для атрибута края, но пока безуспешно. ниже приведен пример текущего кода, который я пробовал, но получаю много ошибок, в том числе:
Ошибка в rgb (x 1 / 255, x [2] / 255, x [3] /255): интенсивность цвета NA, не в [0,1]
Я просмотрел много других связанных вопросов, но не смог получить правильный код
V(Network)$color <- colrs[V(Network)$media.type]
ct <- colorRamp(c("black", "green"))
E(Network)$color = sapply(ct(E(Network)$type), function(x) rgb(x[1]/255, x[2]/255, x[3]/255))
plot(Network, edge.arrow.size = 0.4, edge.curved = .3, vertex.label.cex = .7, vertex.label = V(Network)$media)
Я также пробовал это, но получил график, сгенерированный без ребер, хотя, как показано на рисунке ниже. любая помощь будет оценена. спасибо
> colrs <- c("gray50", "tomato", "gold")
V (сеть) $ color <- colrs [V (сеть) $ media.type] ct <- c ("черный", "зеленый") edge.cl <-ct [E (сеть) $ тип] <br>plot (сеть, edge.arrow.size = 0,4, edge.curved = .3, vertex.label.cex = .7, vertex.label = V (сеть) $ media, edge.color = edge.cl) введите описание изображения здесь