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

Question

IR，感谢库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打包更多高级选项和控制（例如，afilter inseewave可能是一个很好的解决方案，但不幸的是我无法在 R 2.14 中运行它 - 不兼容）。

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

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

你可以通过

 s2 <- normalize(s1) 

您可以听到（并在图上看到）s2 更响亮。