From 1c65c0e319f79b8a2e2bb38fa104a7dac7ff05cb Mon Sep 17 00:00:00 2001 From: D'HERVE Tristan <tristan.dherve@imt-atlantique.net> Date: Mon, 28 Apr 2025 08:38:51 +0000 Subject: [PATCH] Upload New File --- docs/SARaudio.m | 46 ++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 46 insertions(+) create mode 100644 docs/SARaudio.m diff --git a/docs/SARaudio.m b/docs/SARaudio.m new file mode 100644 index 0000000..62875ec --- /dev/null +++ b/docs/SARaudio.m @@ -0,0 +1,46 @@ +clear all; +close all; +[x,fe]=audioread('/homes/t24dherv/Documents/SAR_audio/single_tone_cello-a3.wav'); +soundsc(x,fe); + +[w,fe2]=audioread('/homes/t24dherv/Documents/SAR_audio/single_tone_guitar_nylon_string_a3.wav'); +w=w(:,1); +soundsc(w,fe2); + +y = fftshift(fft(x)); +n = length(y); + +y2 = fftshift(fft(w)); +n2 = length(y2); + +freq = -fe/2 : fe/n : fe/2-fe/n; + +freq2 = -fe2/2 : fe2/n2 : fe2/2-fe2/n2; + + +plot(freq,abs(y)) +figure; +clf; +plot(freq2,abs(y2)); + +clear all; +close all; + +[x3,fe3]=audioread('/homes/t24dherv/Documents/SAR_audio/single_tone_piano1.wav'); +soundsc(x3,fe3); + +y3 = fftshift(fft(x3)); +n3 = length(y3); + +freq3 = -fe3/2 : fe3/n3 : fe3/2-fe3/n3; + +[x4,fe4]=audioread('/homes/t24dherv/Documents/SAR_audio/single_tone_piano2.wav'); +soundsc(x4,fe4); + +y4 = fftshift(fft(x4)); +n4 = length(y4); + +freq4 = -fe4/2 : fe4/n4 : fe4/2-fe4/n4; + +plot(freq3,abs(y3)); +plot(freq4,abs(y4)); \ No newline at end of file -- GitLab