# A n=1,000 sample from the European Social Survey.(Round 8, 2016)
data("ess")
logCoin(ess, c("Social participation", "Political participation"),
noFirstCat=c("Social participation", "Political participation"),
exogenous=c("Age", "Gender"), weight = "cweight",
order=3, pmax=.05,percentage = TRUE, frequency = TRUE ) # network object
Run the code above in your browser using DataLab