733.sagews

m=random_matrix(ZZ,10,density=.5)
a=DiGraph(m)

show(a)

@interact
def show_subgraph(to_delete=slider(range(10),label="Delete")):
    vertices=range(10)
    del vertices[to_delete]
    show(a.subgraph(vertices),edge_labels=True)

Delete

@interact
def show_subgraph(to_delete=selector(range(10),buttons=True)):
    vertices=set(range(10))
    vertices.remove(to_delete)
    show(a.subgraph(vertices),edge_labels=True)

to_delete  0 1 2 3 4 5 6 7 8 9

@interact
def show_subgraph(to_delete=selector(range(10),buttons=True)):
    vertices=set(range(10))
    subgraph_vertices=vertices.difference([to_delete])
    html.table([["Original", "New"],
               [plot(a,save_pos=True,edge_labels=True), plot(a.subgraph(subgraph_vertices),edge_labels=True)]],
               header=True)

to_delete  0 1 2 3 4 5 6 7 8 9