如何通过循环在 R 中保存多个图？

Question

I am using the following script to generate a network diagram. Since the script generates 300+ network diagrams and I need to save them in TIFF (.tiff) format. Can anyone help me with a looping command the simultaneously exports every plot.

address = vector()
net_density = vector()
net_diameter = vector()

ln= 0    #ln is short for line number

#contruct Relationship Tree
for (i in unique_reddit)
{ graph = construct_graph(reddit_content(i))
  ln = ln + 1
  address[ln] = i
  net_density[ln] = edge_density(graph)
  net_diameter[ln] = diameter(graph)
}

net_properties = data.frame(address, net_density, net_diameter)

Answer 1

You can save plot with the following code. The names are changed with a paste in the loop.

Note that I can't test your code because I miss unique_reddit variable.

address = vector()
net_density = vector()
net_diameter = vector()

ln= 0    #ln is short for line number

#contruct Relationship Tree
for (i in unique_reddit)
{ 
  # create file
  tiff(paste0("absolute_path/",i,".tiff") )

  graph = construct_graph(reddit_content(i))
  ln = ln + 1
  address[ln] = i
  net_density[ln] = edge_density(graph)
  net_diameter[ln] = diameter(graph)

  # Close the pdf file
  dev.off()
}

net_properties = data.frame(address, net_density, net_diameter)