# A data frame with two variables Gender and Opinion
frame<-data.frame(Gender=c(rep("Man",3),rep("Woman",3)),
Opinion=c("Yes","Yes","No","No","No","Yes"))
surScat(frame) # network object
Run the code above in your browser using DataLab