Получите одноуровневый DWT шумного доплеровского сигнала с помощью имени вейвлета.

load noisdopp;
[cA,cD] = dwt(noisdopp,'sym4');

Восстановите сглаженную версию сигнала, используя коэффициенты приближения. Постройте график и сравните с исходным сигналом.

xrec = idwt(cA,zeros(size(cA)),'sym4');
plot(noisdopp)
hold on
grid on
plot(xrec)
legend('Original','Reconstruction')

Получите одноуровневый DWT шумного доплеровского сигнала с помощью вейвлет (highpass) и масштабирования (lowpass).

load noisdopp;
[LoD,HiD] = wfilters('bior3.5','d');
[cA,cD] = dwt(noisdopp,LoD,HiD);

Создайте банк фильтров DWT, который можно применить к шумному доплеровскому сигналу с помощью того же вейвлета. Получите фильтры highpass и lowpass из набора фильтров.

len = length(noisdopp);
fb = dwtfilterbank('SignalLength',len,'Wavelet','bior3.5');
[lo,hi] = filters(fb);

Для bior3.5 вейвлет, lo и hi являются матрицами 12 на 2. lo являются lowpass и hi являются высокочастотными фильтрами. Первые столбцы lo и hi используются для анализа, а вторые столбцы используются для синтеза. Сравнение первого столбца lo и hi с LoD и HiD соответственно. Подтвердите, что они равны.

disp('Lowpass Analysis Filters')

Lowpass Analysis Filters

[lo(:,1) LoD']

ans = 12×2

   -0.0138   -0.0138
    0.0414    0.0414
    0.0525    0.0525
   -0.2679   -0.2679
   -0.0718   -0.0718
    0.9667    0.9667
    0.9667    0.9667
   -0.0718   -0.0718
   -0.2679   -0.2679
    0.0525    0.0525
      ⋮

disp('Highpass Analysis Filters')

Highpass Analysis Filters

[hi(:,1) HiD']

ans = 12×2

         0         0
         0         0
         0         0
         0         0
   -0.1768   -0.1768
    0.5303    0.5303
   -0.5303   -0.5303
    0.1768    0.1768
         0         0
         0         0
      ⋮

Постройте график односторонних величин частотных характеристик вейвлет первого уровня и масштабирующих фильтров.

[psidft,f,phidft] = freqz(fb);
level = 1;
plot(f(len/2+1:end),abs(phidft(level,len/2+1:end)))
hold on
plot(f(len/2+1:end),abs(psidft(level,len/2+1:end)))
grid on
legend('Scaling Filter','Wavelet Filter')
title('First-Level One-sided Frequency Responses')
xlabel('Normalized Frequency (cycles/sample)')
ylabel('Magnitude')

Обратитесь к разделу Поддержка GPU по версии (Parallel Computing Toolbox), чтобы узнать, какие графические процессоры поддерживаются.

Загрузите шумный сигнал Доплера. Поместите сигнал на графический процессор с помощью gpuArray. Сохраните текущий режим расширения.

load noisdopp
noisdoppg = gpuArray(noisdopp);
origMode = dwtmode('status','nodisp');

Использование dwtmode для изменения режима внутреннего абонента на нулевое заполнение. Получите одноуровневое дискретное вейвлет сигнала на графическом процессоре с помощью db2 вейвлет.

dwtmode('zpd','nodisp')
[cA,cD] = dwt(noisdoppg,'db2');

Текущий режим расширения zpd не поддерживается для gpuArray вход. Поэтому DWT выполняется вместо этого с помощью sym режим расширения. Подтвердите это, взяв DWT noisdoppg с установленным на sym режимом расширения и сравните с предыдущим результатом.

[cAsym,cDsym] = dwt(noisdoppg,'db2','mode','sym');
[max(abs(cA-cAsym)) max(abs(cD-cDsym))]

ans =

     0     0

Неподдерживаемый режим расширения, заданный в качестве входного параметра, преобразуется в 'sym'. Подтвердите, что взятие DWT noisdoppg с 'mode' set в неподдерживаемом режиме также по умолчанию задает значение sym режим расширения.

[cA,cD] = dwt(noisdoppg,'db2','mode','spd');
[max(abs(cA-cAsym)) max(abs(cD-cDsym))]

ans =

     0     0

Измените текущий режим внутреннего абонента на периодический. Получите одноуровневое дискретное вейвлет сигнала на графическом процессоре с помощью db2 вейвлет.

dwtmode('per','nodisp')
[cA,cD] = dwt(noisdoppg,'db2');

Подтвердите текущий режим расширения per поддерживается для gpuArray вход.

[cAper,cDper] = dwt(noisdopp,'db2','mode','per');
[max(abs(cA-cAper)) max(abs(cD-cDper))]

ans =

     0     0

Восстановите режим расширения к исходной настройке.

dwtmode(origMode,'nodisp')