## Not run:
# #load simulated singing data (see data documentation)
# , data(sim.coor.sing)
#
# # testing if coordination happens less than expected by chance
# coor.test(sim.coor.sing, iterations = 100, less.than.chance = TRUE)
#
# # testing if coordination happens more than expected by chance
# coor.test(sim.coor.sing, iterations = 100, less.than.chance = FALSE)
# ## End(Not run)
Run the code above in your browser using DataLab