# NOT RUN {
# load data
data("RI")
# Simulate point processes
points1 <- PointSim(10, RI)
points2 <- PointSim(20, RI)
# Create two networks
net1 <- NetSim(points1)
net2 <- NetSim(points2)
compare_networks(net1, net2)
# }
Run the code above in your browser using DataLab