如何连接R中列表中的多个.wav文件？

Question

我有一个.wav文件列表my_list：

library(seewave)
library(tuneR)
data(tico)
audio <- tico
freq <- 22050
breaks <- c(0,0.2,0.4,0.6,0.8)
index <- 1:(length(breaks)-1)
my_list<-lapply(index, function(i) audio[(breaks[i]*freq):(breaks[i+1]*freq)])

我也希望将所有这些文件合并到1个.wav文件中，但这不起作用：

index <- 1:length(breaks) 
allf =lapply(index, function(i) bind(my_list[[i]]))

这样做太繁琐了，因为我要创建数百个多个文件：

allf =bind(my_list[[1]],my_list[[2]],my_list[[3]], my_list[[4]])