2017-03-01 3 views
0

ggnet2를 사용하여 네트워크를 계획하고 있습니다. 내 네트워크의 범위는 -1에서 1까지입니다. 나는 음수 값을 색칠 (또는 라인 타이핑)하는 방법을 찾기 위해 노력 중이므로 양수 값과 구별 할 수 있습니다. , ggnet2에서 오류 (BIP : 다음ggnet2 : 음수 값을 사용하는 가중치로 edge.size

n <- data.frame(event1 = c(-0.2,0.8,0.4), 
       event2 = c(0.34,-0.17,0.3), 
       event3 = c(0.2,0.1,-0.73), 
       row.names = letters[1:3]) 
net <- network(net, 
       matrix.type = "bipartite", 
       ignore.eval = FALSE, 
       names.eval = "weights") 

내가 지금처럼 음모로 이동 :

ggnet2(net,label = TRUE, edge.size = "weights") 

내가 때문에 음의 값의 오류가 여기에

그래서 샘플 데이터입니다 label = TRUE, edge.size = "weights") : 잘못된 edge.size 값

가장자리를 어떤 식 으로든 눈에 띄게 만드는 방법에 대한 아이디어가 있습니까? 나는 특정 값을 밖으로 나올 수 있도록 "1"과 같이 각각 다른 시그마 그림을 추가 할 수 있다고 생각했지만 특정 가장자리를 색칠하거나 특정 가장자리의 선 종류를 변경하는 코드를 설정하는 방법을 알 수 없습니다. . 미리 감사드립니다!

답변

0

음수 및 양수 값에 색상을 지정할 수 있습니다. ggnet2: network visualization with ggplot2

: 당신이 여기에서 확인하실 수 있습니다 자세한 내용과 예제는

n <- data.frame(event1 = c(-0.2,0.8,0.4,0), 
       event2 = c(0.34,-0.17,0.3,0), 
       event3 = c(0.2,0.1,-0.73,0), 
       row.names = letters[1:4]) 
net <- network(n, 
       matrix.type = "bipartite", 
       ignore.eval = FALSE, 
       names.eval = "weights") 

col = c("actor" = "grey", "event" = "gold") 
set.edge.attribute(net, "color", ifelse(net %e% "weights" > 0, "green", "red")) 
ggnet2(net, color = "mode", palette = col, label = TRUE, edge.color = "color") 

: 예를 들어,