0

IR、ライブラリのおかげでsound、正弦波を作成できます。

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

波形をプロットすると、次のような画像が得られます。

plot(s1[1:100])

波形

波形は[-1、+1]の間隔で移動します。再生すると、どのデシベルに対応しますか？

指定されたデシベルレベル（つまり、波音、周波数650Hz、持続時間1秒、サンプリングレート44100、16ビット、2チャネル、55dB）で波音（同じパラメーターを使用）を生成するにはどうすればよいですか？

前もって感謝します！

4

1 に答える 1

0

それで、振幅を右に変更したいと思いますか？sound非常に基本的なパッケージであるため、希望どおりに振幅を変更する簡単な方法はありません。より高度なオプションとコントロールを試すtuneRか、seewaveパッケージ化します (たとえば、afilter inseewaveは良い解決策かもしれませんが、残念ながら R 2.14 では実行できませんでした - 互換性がありません)。

簡単な方法でできることは、 を使用して音量を変更することですが、パッケージnormalizeの「デフォルト」の振幅では機能しません。soundたとえば、この正弦波を生成する場合

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

あなたはそれを正規化することができます

 s2 <- normalize(s1)

また、s2 の方が大きいことがわかります (プロットで確認できます)。

于 2011-12-02T14:09:49.710 に答える