Network figure

Hi,
I need help to create network figure in igraph. I used the below script, but the node names and their connections appear cluttered. Please find the attached image file. Does anyone have suggestion to create a network figure, where all the nodes and edges can be clearly seen?

V(graph)[c("DISC1","GSK3B", "NRG1", "BDNF","GRM5", "DLG2", "DTBP1", "1433E", "NMDE1", "CNTP2")]$label.color <-"blue" 
      
l <- layout.fruchterman.reingold(graph, niter=5000, area=vcount(graph)^4*10)

g <- plot(graph, layout=l, 
          edge.arrow.size=0.5, 
          vertex.label.cex=0.75, 
          vertex.label.family="Helvetica",
          vertex.label.font=2,
          vertex.shape="circle", 
          vertex.size=1, 
          vertex.color="black", 
          edge.width=0.5)

Thanks

Priya

I’m new to igraph, but I was able to clean up my graph by adjusting the margin, changing the font size, and altering the label distance. Here are my setting for python, I’m sure you can produce something like it in r.

style[“margin”] = 100
style[“vertex_label_dist”] = -3
style[“vertex_label_size”] = 10

@Charles_Palmer

Thank you for your suggestions. I will try it in R.