지하철 노선에 대한 네트워크 시각화

install.packages("tidygraph")
install.packages("ggraph")
install.pcckages("igraph")
library(tidygraph)
library(ggraph)
library(igraph)

 

 

read.csv(file = "E:/subway.csv", header = TRUE) %>%
    tidygraph::as_tbl_graph() %>%
    ggraph::ggraph(layout = "kk") +
    ggraph::geom_node_point(color = "gray25", size = 2) +
    ggraph::geom_edge_link(aes(color = line)) +
    ggraph::theme_graph()

 

[ 출처 ] https://kuduz.tistory.com/1087