# These codes can be applied to the data supplied in the associated Excel file. 

# Binary choice collision trials (Wilcoxon matched pairs test):
# This test was run for each of the four experiments separately
> wilcox.test(BinaryControl,BinaryTreatment,paired=TRUE)

# Avoidance trials (Wilcoxon matched pairs test):
# This test was run for each of the four experiments separately
> wilcox.test(AvoidControl,AvoidTreatment,paired=TRUE)

# Comparison of within-individual change in window avoidance data from experiments 1 and 3 (exterior fixed window film) with data from experiments 2 and 4 (interior fixed window film):
> wilcox.test(ExteriorAvoidance,InteriorAvoidance)