1

我正在 R 中构建一个用于选择 WAV 文件的脚本。但是，在最后几行中，当我尝试使用 tuneR 包的 Wave 函数来确定音频文件配置时，它无法识别该函数。我需要这个函数才能将我的最终文件保存到输出目录，我如何得到这个？

library(seewave)
library(tuneR)
library(warbleR)                                                                                                                          
library(monitoR)

input_dir <- setwd("D:\\teste")!
output_dir <- setwd("D:\\teste_saida")!

setwd(input_dir)

lis.files<-dir(".", pattern="wav")

list.sample.lucas<-sample(lista.arquivos)

list.sample.lucas.01<-list.sample.lucas[1:4]

for (i in lista.aleat.lucas.01){  
  audios <- readWave(i, from = 0, to = 60, units = c("seconds"), header = FALSE, toWaveMC = TRUE) 
  audios2 <- Wave(left=channel,rigth = channel, samp.rate=audios@samp.rate, bit= audios@bit) 
  file_novo<-paste("Lucas_01_", lista.aleat.lucas.01, sep="") 
  setwd(output_dir) 
  writeWave(audios2, file_novo, extensible = TRUE)
  setwd(input_dir) 
}

audios2 <- Wave(left=channel,rigth = channel, samp.rate=audios@samp.rate, bit= audios@bit)

（函数（类，fdef，mtable）中的错误无法找到签名“函数”的函数“Wave”的继承方法</p>

我希望能够列出我的 wav 文件，随机选择 2 个文件并保存为输出目录中的 WAV 文件。

4

0 回答 0