Is the following 10-fold execution time factor delay normal?
library(seewave)
library(tuneR)
wave=readWave("9741896_18_04_2021_0540.wav")
wave_duration=length(wave@left)/wa...@samp.rate
system.time(spec(wave,from=0,to=floor(wave_duration)))
system.time(spec(wave))