library(dogesr)
data("families")
# Which type was the Dandolo family?
family.types[["Dandolo"]]
# Which families bought their way into the nobility
family.types == "Soldo"
# The families that actually "made doge"
unique(data.doges$Family.doge)
# And their types
family.types[unique(data.doges$Family.doge)]
# Families that had either doge or dogaresse
unique( c(data.doges$Family.doge,data.doges$Family.dogaressa))
Run the code above in your browser using DataLab