R/SocialNetworkAnalysis
네트워크를 시각화 2
이부일
2019. 11. 8. 15:56
# 패키지 설치하기와 로딩하기
install.packages("tidygraph")
install.packages("ggraph")
install.pcckages("igraph")
library(tidygraph)
library(ggraph)
library(igraph)
# 작업공간 설정하기
setwd("d:/")
# 데이터 읽어오기
feature <- read.csv(file = "feature.csv", header = TRUE)
# igraph 데이터로 변경하기
feature_igraph <- tidygraph::as_tbl_graph(feature)
# 네트워크 시각화
feature_graph %>%
ggraph::ggraph() +
ggraph::geom_node_point() +
ggraph::geom_edge_link() +
ggraph::geom_node_text(aes(label = name))