degree centrality
indeg_cent <- degree(krack_full, mode = 'in', normalized = T)
sort(indeg_cent, decreasing = T)
outdeg_cent <- degree(krack_full, mode = 'out', normalized = T)
closeness centrality
inclose_cent <- closeness(krack_full, mode = 'in', normalized= T)
sort(inclose_cent)
outclose_cent <- closeness(krack_full, mode = 'out', normalized= T)
betweenness centrality
bet_cent <- betweenness(krack_full, directed = T)
sort(bet_cent, decreasing = T)
eigenvector centrality
undirected <- as.undirected(krack_full, mode = 'collapse')
ev_cent <- sort(evcent(undirected)$vector, decreasing = T)
sort(ev_cent)
