search for: geom_edge_arc

Hi, this seems to work (assuming that your problem was the setting of colours...): --- snip --- network %>% ggraph(., layout = "auto") + # This produces an error... # geom_edge_arc(curvature=0.3, aes(width=(E(network)$weight/10), color=c("darkblue", "red")[as.factor(edge_list$relationship)], alpha=0.5)) + # ... this works :-) geom_edge_arc(curvature=0.3, aes(width=E(network)$weight/10, color=edge_list$relationship), alpha=.5) + scale_edge_colo...

...eight, edge.color = ifelse(edge_list$relationship == "pos", "blue", "red"), layout=layout_with_mds(.)) tiff("figures/Test_network_bysubcatecory.tiff", width=1000, height=900, res=120) network %>% ggraph(., layout = "auto")+ geom_edge_arc(curvature=0.3, aes(width=(E(network)$weight/10), color=c("darkblue", "red")[as.factor(edge_list$relationship)], alpha=0.5)) + geom_node_point(aes(size = V(network)$hub_score*200, color= as.factor(V(network)$community))) + geom_node_text(aes(label = V(network)$name), size...

...e grouping is defined in the edge_list$relationship: negative relationship = red and positive relationship = darkblue. The code is working in the way that the groups are separated by two colors. However, the code uses not the assigned colors. Does anyone have any idea how to adapt the code? --> geom_edge_arc(curvature=0.3, aes(width=(E(network)$weight/10), color=c("darkblue", "red")[as.factor(edge_list$relationship)], alpha=0.5)) + Kind regards Sibylle Working example library(circlize) library(ggplot2) library(igraph) library(tidyverse) library(RColorBrewer) library(stringi) l...

...ist$relationship: negative > relationship > = red and positive relationship = darkblue. The code is working in the > way > that the? groups are separated by two colors. However, the code uses not > the > assigned colors. Does anyone have any idea how to adapt the code? > --> geom_edge_arc(curvature=0.3, aes(width=(E(network)$weight/10), > color=c("darkblue", "red")[as.factor(edge_list$relationship)], > alpha=0.5)) + > > Kind regards > Sibylle > > > > > Working example > > library(circlize) > library(ggplot2) > libra...

The reason html is specifically advised against as a format is that it does things like mangling data such as is happening in your example. You should repost using settings on you mail client for plain-text. Your code should start by loading necessary packages. You should also not post screen output versions of code since that will insert lots of superfluous "+"'s. Some but not

...the Windows character set database --> I am unsure if mySQL is the right solution. I have no experience how to change mySQL. Kind regards Sibylle tiff("figures/AES_network_bymembership.tiff", width=1000, height=700, res=120) network %>% ggraph(., layout = "auto")+ geom_edge_arc(curvature=0.3, aes(width=(E(network)$weight/10), color=from, alpha=0.5)) + geom_node_point(aes(size = V(network)$hub_score*200, color= as.factor(V(network)$community))) + geom_node_text(aes(label = V(network)$name), size=5, color="white", repel=T)+ scale_color_scico_d(palette = &qu...

Hi, a quick additional note: try "edge.width= E(.)$weight" instead of the current "edge.width= network". Seems to work and makes a visible difference... HTH, Kimmo su, 2024-02-25 kello 19:11 +0000, Kimmo Elo kirjoitti: > > Hi again, > > your code is still not reproducible without modifications, but I > succeed in getting the data straight. All