.wav文件长度/持续时间没有在文件中读取

Question

有没有办法提取有关.wav文件长度/持续时间的信息而无需读入R中的文件？我有成千上万的这些文件，如果我必须阅读每一个文件以查找其持续时间，将需要很长时间。 Windows文件资源管理器为您提供了打开长度字段的选项，您可以看到文件的持续时间，但有没有办法提取该信息以便能够在R中使用？

这是我尝试过并且希望避免做的事情，因为读取R中的数万个音频文件需要很长时间：

library(tuneR)
audio<-readWave("AudioFile.wav")
round(length(audio@left) / audio@samp.rate, 2)

Answer 1

您可以使用tuneR包中的readWave功能header=TRUE。这只会占用文件的元数据，而不是整个文件。

library(tuneR)
audio<-readWave("AudioFile.wav", header=TRUE)
round(audio$samples / audio$sample.rate, 2)