# 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)
}
# }
Run the code above in your browser using DataLab