A short description of the post.
set.seed(1)
canvas_diamonds(colors = colorPalette("klimt"))

data(flo, package="network")
matrix <- as.matrix(flo)
florentine<- graph.adjacency(flo, mode="directed", weighted=NULL)
plot(florentine)

For attribution, please cite this work as
Milstein (2022, Jan. 31). Noah_Milstein_Blog: Homework_2_Network. Retrieved from https://nmilsteinuma.github.io/posts/2022-01-31-homework2network/
BibTeX citation
@misc{milstein2022homework_2_network,
author = {Milstein, Noah},
title = {Noah_Milstein_Blog: Homework_2_Network},
url = {https://nmilsteinuma.github.io/posts/2022-01-31-homework2network/},
year = {2022}
}