给定指定的分贝级别，如何在 R 中创建波浪声音？

Question

我 R，感谢库 sound，我们能够创建正弦波：

s1 <- Sine(650, 1, 44100, 16, 2)

绘制波形我们得到这样的图像：

plot(s1[1:100])

波形在区间 [-1, +1] 内移动。如果我播放它，它对应于多少分贝？

如何生成波声（参数相同），指定分贝级别（即波声，频率650Hz，持续时间1秒，采样率44100，16位，2通道，55dB）？

提前致谢！

Answer 1

所以我猜你想改变幅度对吧？没有直接的方法可以按照您想要的方式更改sound 中的幅度，因为它是非常基本的包。尝试tuneR 或seewave 包以获得更高级的选项和控制（例如seewave 中的afilter 可能是一个很好的解决方案，但不幸的是我无法在R 2.14 中运行它 - 不兼容）。

您可以做的一个简单的方法是使用normalize 来改变音量，但它不适用于sound 包中的“默认”幅度。例如，如果你产生这个正弦波

 s1 <- .6*Sine(650, 1, 44100, 16, 2)  

你可以把它标准化

 s2 <- normalize(s1) 

您可以听到（并在图上看到）s2 的声音更大。