Задайте последовательность и вычислите ее аналитический сигнал с помощью hilbert.

xr = [1 2 3 4];
x = hilbert(xr)

x = 1×4 complex

   1.0000 + 1.0000i   2.0000 - 1.0000i   3.0000 - 1.0000i   4.0000 + 1.0000i

Воображаемая часть x является преобразованием Гильберта xr, и действительная часть xr сам.

imx = imag(x)

imx = 1×4

     1    -1    -1     1

rex = real(x)

rex = 1×4

     1     2     3     4

Последняя половина дискретного преобразования Фурье (DFT) x равен нулю. (В этом примере последняя половина преобразования является просто последним элементом.) Элементы DC и Nyquist fft(x) чисто настоящие.

dft = fft(x)

dft = 1×4 complex

  10.0000 + 0.0000i  -4.0000 + 4.0000i  -2.0000 + 0.0000i   0.0000 + 0.0000i

The hilbert функция находит точный аналитический сигнал для конечного блока данных. Можно также сгенерировать аналитический сигнал с помощью фильтра трансформатора с конечной импульсной характеристикой (КИХ) для вычисления приближения к мнимой части.

Сгенерируйте последовательность, состоящую из трех синусоидов с частотами 203, 721 и 1001 Гц. Последовательность отбирают при 10 кГц в течение примерно 1 секунды. Используйте hilbert функция для вычисления аналитического сигнала. Постройте график между 0,01 секунд и 0,03 секунд.

fs = 1e4;
t = 0:1/fs:1; 

x = 2.5 + cos(2*pi*203*t) + sin(2*pi*721*t) + cos(2*pi*1001*t);

y = hilbert(x);

plot(t,real(y),t,imag(y))
xlim([0.01 0.03])
legend('real','imaginary')
title('hilbert Function')

Вычислите оценки Уэлча спектральных плотностей степени исходной последовательности и аналитического сигнала. Разделите последовательности на неперекрывающиеся участки длины 256 с окном Хемминга. Проверьте, что аналитический сигнал не имеет степени на отрицательных частотах.

pwelch([x;y].',256,0,[],fs,'centered')
legend('Original','hilbert')

Используйте designfilt функция для разработки конечной импульсной характеристики трансформатора 60-го порядка. Задайте ширину перехода 400 Гц. Визуализируйте частотную характеристику фильтра.

fo = 60;

d = designfilt('hilbertfir','FilterOrder',fo, ...
       'TransitionWidth',400,'SampleRate',fs); 

freqz(d,1024,fs)

Фильтрация синусоидальной последовательности для аппроксимации мнимой части аналитического сигнала.

hb = filter(d,x);

Групповая задержка фильтра, grd, равно половине порядка фильтра. Компенсируйте эту задержку. Удалите первый grd выборки мнимой части и последнего grd выборки действительной части и временного вектора. Постройте график результата между 0,01 секундами и 0,03 секундами.

grd = fo/2;
   
y2 = x(1:end-grd) + 1j*hb(grd+1:end);
t2 = t(1:end-grd);

plot(t2,real(y2),t2,imag(y2))
xlim([0.01 0.03])
legend('real','imaginary')
title('FIR Filter')

Оцените степень спектральную плотность (PSD) приблизительного аналитического сигнала и сравните ее с hilbert результат.

pwelch([y;[y2 zeros(1,grd)]].',256,0,[],fs,'centered')
legend('hilbert','FIR Filter')