data(list = c("Arre.aura","manualoc.df"))
writeWave(Arre.aura, "Arre.aura.wav") #save sound files
# specifying the correct margin is important
# use snrspecs to troubleshoot margins for sound files
sig2noise(manualoc.df[grep("Arre", manualoc.df$sound.files), ], mar = 0.2)
# this smaller margin doesn't overlap neighboring calls
sig2noise(manualoc.df[grep("Arre", manualoc.df$sound.files), ], mar = 0.1)
Run the code above in your browser using DataLab