Написание простого дискретного преобразования Фурье для реальных входов в C

Итак, я пытаюсь написать дискретное преобразование Фурье в C, чтобы работать с реальными 32-битными wat файлами float. Он читает по 2 кадра за раз (по одному для каждого канала, но для моих целей я предполагаю, что они оба одинаковые, и поэтому я использую frame [0]). Этот код должен записывать амплитудный спектр для входного файла, исследуя его с частотами 20, 40, 60,..., 10000. Я использую окно Hanning на входных кадрах. Я хочу избежать использования сложных чисел, если смогу. Когда я запускаю это, это дает мне очень странные амплитуды (большинство из которых чрезвычайно малы и не связаны с правильными частотами), что заставляет меня думать, что я делаю фундаментальную ошибку в своих вычислениях. Может ли кто-нибудь дать представление о том, что здесь происходит? Вот мой код:

Ответы

Ответ 1

Я думаю, что ошибка заключается в вычислении угла. Приращение угла для каждого образца зависит от частоты дискретизации. Что-то вроде этого (у вас, кажется, 44100 Гц):

angle = (2.0 * M_PI * probe[j] * n) / 44100;

Ваше тестовое окно будет содержать один полный цикл для вашей самой низкой частоты зондирования 20 Гц. Если вы зацикливаете n до 2205, тогда этот угол будет 2 * M_PI. То, что вы видели, было, вероятно, псевдонимом, потому что ваша ссылка имела частоту 2205 Гц, а все частоты выше 1102 Гц были сглажены на более низкие частоты.

Ответ 2

С кодом ниже - только слегка реорганизованный для компиляции и создания поддельного образца, я не получаю все нули. Я изменил выходной вызов в конце:

fprintf(f, "%d\t%f\n", probe[j], mag[j] );

if (mag[j] > 1e-7)
    fprintf(f, "%d\t%f\n", probe[j], mag[j] * 10000);

Это упрощает просмотр ненулевых данных. Может быть, единственная проблема заключается в понимании масштабного фактора? Обратите внимание, как я подделывал ввод, чтобы генерировать чистый тон в качестве тестового примера.

#include <math.h>

#include <stdio.h>

#define M_PI 3.1415926535

#define SAMPLE_RATE 44100.0f

#define len(array) (sizeof array/sizeof *array)


unsigned psf_sndReadFloatFrames(FILE* inFile,float* frame,int framesToRead)
{
    static float counter = 0;   
    float frequency = 1000;
    float time = counter++;
    float phase = time/SAMPLE_RATE*frequency;
    *frame = (float)sin(phase);
    return counter < SAMPLE_RATE;
}

void discreteFourier(FILE* f)                    
{
    FILE* ifd = 0;
    float frame[1];
    int windowSize = 2205;
    int probe[500];
    float hann[2205];


    float angle = 0.0;
    float w = 0.0; // windowed sample
    float realSum[len(probe)]; // stores the real part of the probe[j] within a window
    float imagSum[len(probe)]; // stores the imaginary part of probe[j] within window
    float mag[len(probe)]; // stores the calculated amplitude of probe[j] within a window

    int j, n;

    unsigned framesread = 0;
    unsigned totalread = 0;

    for (j=0; j<len(probe);j++) {
        realSum[j] = 0.0;
        imagSum[j] = 0.0;
        mag[j] = 0.0;
    }

    // initialize probes to 20,40,60,...,10000
    for (j=0; j< len(probe); j++) {
        probe[j] = j*20 + 20;
        fprintf(f, "%d\n", probe[j]);
    }
    fprintf(f, "-1\n");
    // setup the Hann window
    for (n=0; n< len(hann); n++) 
    {
        hann[n] = 0.5*(cos((2*M_PI*n/(float)windowSize) + M_PI))+0.5;
    }
    n=0; //count number of samples within current window
    framesread = psf_sndReadFloatFrames(ifd,frame,1);
    totalread = 0;
    while (framesread == 1){
        totalread++;

        // window the frame with hann value at current sample
        w = frame[0]*hann[n];

        // determine both real and imag product values at sample n for all probe freqs times the windowed signal
        for (j=0; j<len(probe);j++) {
            angle = (2.0 * M_PI * probe[j] * n) / windowSize;
            realSum[j] = realSum[j] + (w * cos(angle));
            imagSum[j] = imagSum[j] + (w * sin(angle));
        }
        n++;
        // checks to see if current window has ended
        if (totalread % windowSize == 0) {
            fprintf(f, "B(%f)\n", totalread/SAMPLE_RATE);
            printf("%f breakpoint written\n", totalread/SAMPLE_RATE);
            for (j=0; j < len(mag); j++) { // print out the amplitudes 
                realSum[j] = realSum[j]/windowSize;
                imagSum[j] = imagSum[j]/windowSize;
                mag[j] = sqrt(pow((double)realSum[j],2)+pow((double)imagSum[j],2))/windowSize;
                if (mag[j] > 1e-7)
                    fprintf(f, "%d\t%f\n", probe[j], mag[j] * 10000);
                realSum[j] = 0.0;
                imagSum[j] = 0.0;
            }
            n=0;
        }
        framesread = psf_sndReadFloatFrames(ifd,frame,1);
    }
}