AudioPitchShift
AudioPitchShift[audio,r]
audio に割合 r のシフトピッチを適用し，すべての周波数を 
から 
にシフトする．
AudioPitchShift[video,r]
video の最初の音声トラックにシフトピッチを適用する．
詳細とオプション
- AudioPitchShiftは，入力音声信号のピッチを持続時間に影響を与えずにシフトする．
- 周波数比 r は，以下を含むピッチ間隔として与えることができる．
-
Quantity[oct,"octaves"] 
に対応Quantity[sem,"semitones"] 
に対応 - 次は，サポートされるオプションである．
-
Method Automatic 使用するメソッド PartitionGranularity Automatic 短時間フーリエ変換の計算に使われる分割を制御する - デフォルトで，位相ボコーダアルゴリズムが使われる．ピッチシフトの音声信号にMethod->"Speech"を使う．この場合は，基本周波数は変えられるが，信号形式は変更されない．
例題
すべて開く すべて閉じる例 (2)
スコープ (4)
a = Import["ExampleData/rule30.wav"];AudioPitchShift[a, Quantity[1.5, IndependentUnit["octaves"]]] === AudioPitchShift[a, 2^1.5]a = Import["ExampleData/rule30.wav"];AudioPitchShift[a, Quantity[10, IndependentUnit["semitones"]]] === AudioPitchShift[a, 2^10 / 12]AudioPitchShiftを使って調和的に複雑なサウンドの高さを，音質やタイミングを変えずに変えることができる：
a = Mean[Table[AudioGenerator[{"Sin", 200 * i}, 2], {i, 1, 6}]]Periodogram[a, ScalingFunctions -> "Absolute", PlotRange -> {{0, 3000}, All}]AudioPitchShift[a, Quantity[12, IndependentUnit["semitones"]]]Periodogram[%, ScalingFunctions -> "Absolute", PlotRange -> {{0, 3000}, All}]AudioPitchShift[\!\(\*VideoBox[""]\), 2]オプション (4)
Method (1)
Method->"Speech"をスピーチ信号に使って，声の他の特徴は変えずにピッチをシフトさせる：
a = \!\(\*AudioBox[""]\);
AudioPitchShift[a, 1.8, Method -> "Speech"]AudioPitchShift[a, 1.8]PartitionGranularity (3)
より大きい分割サイズを使うと周波数応答は向上するが，過渡成分が不鮮明になる：
a = Import["ExampleData/rule30.wav"];
AudioPitchShift[a, 1.1, PartitionGranularity -> Quantity[46, "Milliseconds"]]AudioPitchShift[a, 1.1, PartitionGranularity -> Quantity[150, "Milliseconds"]]小さいオフセット値を使うと，一般に，時間はかかるが結果の質が上がる：
a = Import["ExampleData/rule30.wav"];
AudioPitchShift[a, 1.1, PartitionGranularity -> {Quantity[46, "Milliseconds"], Quantity[20, "Milliseconds"]}]AudioPitchShift[a, 1.1, PartitionGranularity -> {Quantity[46, "Milliseconds"], Quantity[5, "Milliseconds"]}]分割サイズのみが指定されている場合は，オフセットは25%として計算される．
a = Import["ExampleData/rule30.wav"];
AudioPitchShift[a, 1.1,
PartitionGranularity -> {Quantity[46, "Milliseconds"], Quantity[10, "Milliseconds"], DirichletWindow}]AudioPitchShift[a, 1.1,
PartitionGranularity -> {Quantity[46, "Milliseconds"], Quantity[10, "Milliseconds"], BlackmanWindow}]デフォルトではHannWindowが使われる．
アプリケーション (1)
ターゲットの周波数にマッチするように，音声オブジェクトのピッチをシフトする：
a = \!\(\*AudioBox[""]\);AudioLocalMeasurementsで平均周波数を取り出す：
meanFreq = DeleteMissing@TimeSeries[AudioLocalMeasurements[a, "FundamentalFrequency"]]["Values"]//MeantargetFreq = 1000;AudioPitchShift[a, targetFreq / meanFreq]Periodogram[{a, %}, 4000, PlotRange -> {{0, 4000}, All}]特性と関係 (2)
AudioPitchShiftとAudioFrequencyShiftは信号のスペクトルを別の方法で変更する：
a = Mean[{AudioGenerator[{"Sin", 200}, SampleRate -> 16000], AudioGenerator[{"Sin", 400}, SampleRate -> 16000]}]AudioPitchShiftは信号内の各周波数 f を周波数それ自身に比例する量だけシフトし(f'=f×shift)，シフトされた信号の音色は保存する：
ps = AudioPitchShift[a, 4]AudioFrequencyShiftはすべての周波数 f を同じ量だけシフトし(f'=f+shift)，シフトされた信号の音色を劇的に変える：
fs = AudioFrequencyShift[a, 800]Periodogram[{a, ps, fs}, PlotRange -> {{0, 2000}, All}, ScalingFunctions -> "Absolute", PlotLegends -> {"Original", "Pitch Shift", "Frequency Shift"}]a = \!\(\*AudioBox[""]\);Audio[a, SampleRate -> 44100]AudioPitchShiftはタイミングを変えずに音の高さを変える：
AudioPitchShift[a, 44100 / 22050]考えられる問題 (2)
AudioPitchShift[\!\(\*AudioBox[""]\), 5.6]音声以外の信号にMethod->"Speech"を使っても，期待したようには音が響かないかもしれない：
AudioPitchShift[\!\(\*AudioBox[""]\), 1.8, Method -> "Speech"]テキスト
Wolfram Research (2016), AudioPitchShift, Wolfram言語関数， https://reference.wolfram.com/language/ref/AudioPitchShift.html （2024年に更新）.
CMS
Wolfram Language. 2016. "AudioPitchShift." Wolfram Language & System Documentation Center. Wolfram Research. Last Modified 2024. https://reference.wolfram.com/language/ref/AudioPitchShift.html.
APA
Wolfram Language. (2016). AudioPitchShift. Wolfram Language & System Documentation Center. Retrieved from https://reference.wolfram.com/language/ref/AudioPitchShift.html