Write a Mathematica command that takes the adjacency matrix of a graph and a vertex, and returns the degree of that vertex. Test it on all the vertices of the graph of Figure 1.4.