Grafo de 9 nodos no dirigido:

gr_nuevo([[0,0,1,0,0,0,0,0,0],[0,0,0,1,0,0,0,0,0],[1,0,0,1,1,0,0,0,0],[0,1,1,0,0,1,0,0,0],[0,0,1,0,0,1,1,0,0],[0,0,0,1,1,0,0,1,0],[0,0,0,0,1,0,0,0,1],[0,0,0,0,0,1,0,0,0],[0,0,0,0,0,0,1,0,0]],falso)

Salida en JMEScriptGUI con visor de grafos v0.1:

Grado máximo y nodos maximales:

gr_gradomax(gr_nuevo([[0,0,1,0,0,0,0,0,0],[0,0,0,1,0,0,0,0,0],[1,0,0,1,1,0,0,0,0],[0,1,1,0,0,1,0,0,0],[0,0,1,0,0,1,1,0,0],[0,0,0,1,1,0,0,1,0],[0,0,0,0,1,0,0,0,1],[0,0,0,0,0,1,0,0,0],[0,0,0,0,0,0,1,0,0]],falso))

VectorEvaluado: { 'grado': 3 'nodos': [2,3,4,5] }