如何在R语言中通过URL加载WAV文件（Shiny应用场景）

我帮你搞定这个问题！你之前尝试的load(url(...))和loadwave(url(...))无效是有原因的：load()是用来加载R的.RData格式文件的，根本不是处理音频的；而audio::load.wave默认只认本地文件路径，没法直接读远程URL。下面给你两种可行的方案：

方案一：用audio包+临时文件下载 #

既然load.wave需要本地文件，我们可以先把远程WAV文件下载到临时文件，再加载，Shiny里临时文件会自动清理，很方便：

library(audio)

# 替换成你的WAV文件URL
wav_url <- "https://your-domain.com/your-audio-file.wav"

# 创建临时文件（自动带.wav后缀）
temp_file <- tempfile(fileext = ".wav")

# 下载二进制音频文件，一定要加mode="wb"！
download.file(wav_url, temp_file, mode = "wb")

# 加载WAV文件
wav_data <- load.wave(temp_file)

# 可选：手动删除临时文件（Shiny会话结束后会自动删，也可以不写）
file.remove(temp_file)

方案二：用tuneR包直接读取URL #

tuneR包的readWave函数支持直接读取远程URL，不用手动下载临时文件，更简洁：

library(tuneR)

wav_url <- "https://your-domain.com/your-audio-file.wav"
# 直接通过url连接读取完整音频数据
wav_data <- readWave(url(wav_url), header = FALSE)

# 如果你的代码依赖audio包的格式，可以把tuneR的Wave对象转成audioSample：
library(audio)
audio_data <- audioSample(wav_data@left, rate = wav_data@samp.rate)

注意事项 #

• 确保你的WAV文件URL是公开可访问的，如果需要权限验证，可能要给download.file或者url()加额外的请求头参数（比如headers）
• 在Shiny应用里，临时文件会在用户会话结束后自动被系统清理，不用怕占空间

内容的提问来源于stack exchange，提问作者AES