From cef07b4bd72a930fad74b0ef0f7bf765fd59cf28 Mon Sep 17 00:00:00 2001
From: drowe67 <david@rowetel.com>
Date: Sun, 19 Nov 2023 08:28:25 +1030
Subject: drafted time-freq speech section, building up sinsuoidal model figure

---
 octave/plamp.m | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

(limited to 'octave')

diff --git a/octave/plamp.m b/octave/plamp.m
index a224a5c..e32d102 100644
--- a/octave/plamp.m
+++ b/octave/plamp.m
@@ -68,7 +68,8 @@ function plamp(samname, f, epslatex=0)
     s = [ Sn(2*f-1,:) Sn(2*f,:) ];
     plot(s,'b');
     axis([1 length(s) -30000 30000]);
-
+    xlabel('Time (samples)'); ylabel('Amplitude');
+    
     figure(2);
     Wo = model(f,1);
     L = model(f,2);
@@ -78,15 +79,15 @@ function plamp(samname, f, epslatex=0)
     hold on;
     if plot_sw
       plot((0:255)*4000/256, Sw(f,:),"b");
-      legend('boxoff');
     end
+    legend('boxoff'); ylabel ('Amplitude (dB)'); xlabel('Frequency (Hz)');
 
     hold off; grid minor;
 
     % print EPS file
 
     if epslatex
-      sz = "-S300,250";
+      sz = "-S300,200";
       figure(1);
       fn = sprintf("%s_%d_sn.tex",samname,f);
       print(fn,"-depslatex",sz); printf("\nprinting... %s\n", fn);
-- 
cgit v1.2.3