as$\_$adjacency$\_$matrix$($network$,$ attr $=$ "weight", type $=$ "both"$)|>$

as$.$matrix$()|>$ as$\_$tibble$($rownames $=$ "from"$)|>$

# pivot from wide to long format

pivot$\_$longer$(-$from, names$\_$to $="$to$",$ values$\_$to $=$ "weight"$)|>$

ggplot$()+$ geom$\_$tile$($aes$($x $=$ to$,$ y $=$ from, fill $=$ weight$),$ color $=$ "gray$50")+$

scale$\_$fill$\_$gradient$($low $=$ "white", high $=$ "darkblue"$)+$

theme$($axis$.$text.x $=$ element$\_$text$($angle $=90,$ hjust $=1,$ vjust $=0\mathrm{.}5))$

why doesn't the code works