R language draws four schema star diagrams

library(igraph)
g3 <- make_star(10, mode = "in")%>%set_vertex_attr("color", value = "pink")
V(g3)$name <- letters[1:10]
plot(g3)

g3 <- make_star(10, mode = "out")%>%set_vertex_attr("color", value = "pink")

g3 <- make_star(10, mode = "mutual")%>%set_vertex_attr("color", value = "purple")

g3 <- make_star(10, mode = "undirected")%>%set_vertex_attr("color", value = "maroon")

References: http://www.idata8.com/rpackage/igraph/make_star.html
https://blog.csdn.net/m0_38127487/article/details/132103322?spm=1001.2014.3001.5502