library(dogesr)
library(igraph)
# From that one to the end
from.sagredo <- marriage.graph.slice( from="Nicolo Sagredo")
# From the first one to Sagredo
to.sagredo <- marriage.graph.slice( to="Nicolo Sagredo")
# From the first to the last Contarini
from.sagredo <- marriage.graph.slice(
from="Domenico I Contarini",
to="Luigi Contarini"
)
Run the code above in your browser using DataLab