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

Question

I R，感谢图书馆 sound ，我们能够创建一个正弦波:

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

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

plot(s1[1:100])

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

如何生成具有指定分贝级别的波声(具有相同参数)(即波声，频率 650Hz，持续时间 1 秒，采样率 44100，16 位，2 channel ，55dB)？

提前致谢!

Answer 1

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

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

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

你可以通过

 s2 <- normalize(s1) 

您可以听到(并在图上看到)s2 更响亮。