I'm trying to create a network graph based on centrality and I don't understand the error, that I'm getting. The code is following:
library("tidyverse","dplyr","Hmisc", "igraph")
library("tidygraph")
library("ggraph")
#create dataframe
V1 <- c("a","b","c","d")
V2 <- c("e","f","g","d")
cor <- c(0.1,0.2,0.3,0.4)
df <- data.frame(V1,V2,cor)
#create tidygraph
set.seed(1)
cor.graph <- as_tbl_graph(df, directed = FALSE)
#setting nodes
nodes <- df %>%
select(V1)
#activate nodes and get centrality
cor.graph <- cor.graph %>%
activate(nodes) %>%
mutate(centrality = centrality_authority())
#activate edges
cor.graph <- cor.graph %>%
activate(edges)
set.seed(123)
#plot
ggraph(cor.graph,layout = "centrality" )
Throwing this error
Error in eval_tidy(enquo(centrality), .N()) : object '' not found
Any help is highly appreciated.