私は R と EEG 信号について非常に新しいので、質問への答えが明らかである場合はご容赦ください。
アルファ バンドを抽出するために EEG 信号にバターワース フィルターを実行しようとしています。フィルターを実行すると、結果の信号は非常に奇妙に見え、期待したものとはまったく異なり、時間フレームの開始時に異常に大きなピークがありました。コードに問題があるかどうかを確認するために eegfilter と bwfilter を使用してみましたが、結果をプロットすると 2 つの違いはほとんどありませんでした。私は最終結果を説明するのに途方に暮れており、誰かが私に特有の最終結果を説明してくれたらありがたい.
私が見ているデータの例を次に示します: https://ufile.io/1ji48wg6
サンプリングレートは 512 です。
アルファバンドを抽出したいので、8〜12 Hzの周波数
library(eegkit)
mturk <- read.csv("EEG_alpha.csv", head = TRUE, sep= ",")
mturk.but <- eegfilter(mturk, Fs = 512, lower = 8, upper = 12, method = "butter", order = 4)
plot(mturk.but)
これは、プロットされたときのデータの写真です。一番左の画像は生データです。中央のプロットは、eegfilter を使用してバターワース フィルターを適用した結果です。右のプロットは、bwfilter を使用してバターワース フィルターを適用した結果です。
データセットのヘッダー:
脳波
-8438.876837
-8442.718979
-8441.877183
-8439.974768
-8443.436883
-8448.900711
-8452.433874
-8441.616546