# Import netcom
library(netcom)
# Network size (number of nodes)
size <- 10
# Create niche values for each member of the system (node)
niches <- stats::runif(n = size)
# Make network according to the Niche Model
make_NM(size = size, niches = niches)
Run the code above in your browser using DataLab