ffDTW calculates acoustic dissimilarity of fundamental frequency contours using dynamic
time warping. Internally it applies the dtwDist function from the dtw package.
ffDTW(X, wl = 512, flim = c(0, 22), length.out = 20, wn = "hanning", pal = reverse.gray.colors.2, ovlp = 70, inner.mar = c(5, 4, 4, 2), outer.mar = c(0, 0, 0, 0), picsize = 1, res = 100, cexlab = 1, title = TRUE, propwidth = FALSE, xl = 1, gr = FALSE, sc = FALSE, bp = c(0, 22), cex = 1, threshold = 15, col = "red2", pch = 16, mar = 0.05, lpos = "topright", it = "jpeg", img = TRUE, parallel = 1, path = NULL, img.suffix = "ffDTW")spectro. Default is c(0, 22).ftwindow for more options.spectro. Default is reverse.gray.colors.2.spectro. Default is 70.par.par.spectro.TRUE.FALSE.FALSE.FALSE.spectro.FALSE, image files are not produced. Default is TRUE.NULL (default) then the current working directory is used.NULL.FALSE it also produces image files with the spectrograms of the signals listed in the
input data frame showing the location of the fundamental frequencies.
approx function to interpolate values between fundamental
frequency measures. If 'img' is TRUE the function also produces image files
with the spectrograms of the signals listed in the input data frame showing the
location of the fundamental frequencies. Note that if no amplitude is detected at the begining or end
of the signals then NAs will be generated. On the other hand, if amplitude is not detected in between signal
segments in which amplitude was detected then the values of this adjacent segments will be interpolated to fill out the missing values (e.g. no NAs in between detected amplitude segments).
specreator for creating spectrograms from selections,
snrspecs for creating spectrograms to
optimize noise margins used in sig2noiseOther spectrogram.creators: dfDTW,
dfts, ffts,
snrspecs, specreator,
trackfreqs
## Not run:
# # set the temp directory
# setwd(tempdir())
#
# #load data
# data(list = c("Phae.long1", "Phae.long2","manualoc.df"))
# writeWave(Phae.long2, "Phae.long2.wav") #save sound files
# writeWave(Phae.long1, "Phae.long1.wav")
#
# # run function
# ffDTW(manualoc.df, length.out = 30, flim = c(1, 12), img = T, bp = c(1, 9), wl = 300)
#
# ## End(Not run)
Run the code above in your browser using DataLab