How to incresase igraph distance for each edge in R?

[fd5556]

I have a CSV file need to draw a graph.

The graph contains nodes and edges.

Therefore, I used the following code to do it.

start.time <- Sys.time()

#Loading Packages
library(igraph)
library(readr)
library(haven)

#import data
df = read.csv('../../Pre_Draw_Graph_for_R.csv', header = TRUE, encoding = 'UTF-8')

#Creating an iGraph Style Edge List
df_Edge_List <- df

#Creating Graph
df_graph = graph.data.frame(df_Edge_List, directed = TRUE)

#df Network: First Try
#Layout Options
set.seed(3500)
layout1 <- layout.fruchterman.reingold(df_graph)

#Node or vertex Options: Color
V(df_graph)$color <- "yellow"
V(df_graph)[degree(df_graph, mode = "in") > 500]$color <- "red"

#Edge Options: Size
E(df_graph)$color <- "grey"

#Plotting
plot(df_graph, vertex.label=NA)
#plot(df_graph)


end.time <- Sys.time()
time.taken <- end.time - start.time
time.taken

I can output the following result, but the result has some problems. It shows that every node is very crowded.

I hope to increase the graph distance, but I used a lot of methods already. I cannot fix the problem. I hope to get the following result, but I cannot do it now. I want to make it clear to see the graph.

Can anyone help me? Thanks

[EconomiCurtis]

Hi, welcome!

We don't really have enough info to help you out. Could you ask this with a minimal REPRoducible EXample (reprex)? A reprex makes it much easier for others to understand your issue and figure out how to help.

FAQ: What's a reproducible example (`reprex`) and how do I create one?

Why reprex? Getting unstuck is hard. Your first step here is usually to create a reprex, or reproducible example. The goal of a reprex is to package your code, and information about your problem so that others can run it and feel your pain. Then, hopefully, folks can more easily provide a solution. What's in a Reproducible Example? Parts of a reproducible example: background information - Describe what you are trying to do. What have you already done? complete set up - include any library() calls and data to reproduce your issue. data for a reprex: Here's a discussion on setting up data for a reprex make it run - include the minimal code required to reproduce your error on the data…