NetworkData(SingleEffect, TwoEffect, ThreeEffect, FourEffect, FiveEffect, RatioThreshold, NumberThreshold)
data(SingleEffect)
data(TwoEffect)
data(ThreeEffect)
data(FourEffect)
data(FiveEffect)
RatioThreshold <- c(1,1,1,1,1)
NumberThreshold <- c(10,10,10,10,10)
Net <- NetworkData(SingleEffect, TwoEffect, ThreeEffect, FourEffect,
FiveEffect, RatioThreshold, NumberThreshold)
Vertices <- Net$Vertices
Edges <- Net$Edges
Run the code above in your browser using DataLab