#data(finches)
#N_matrix <- matrix(data = rbinom(n = nrow(finches)*ncol(finches),1,prob = 0.75),
# nrow = nrow(finches),
# ncol = ncol(finches)
# ,byrow = T)
#create.N.matrix(N_matrix)
Run the code above in your browser using DataLab