File: pulseApproximate.m

package info (click to toggle)
osmo-trx 1.4.1-2
  • links: PTS, VCS
  • area: main
  • in suites: bookworm
  • size: 1,644 kB
  • sloc: cpp: 11,406; ansic: 4,697; makefile: 483; asm: 329; sh: 141; xml: 79
file content (15 lines) | stat: -rw-r--r-- 266 bytes parent folder | download | duplicates (5) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
pp = [0 0 0.015 0.18 0.7 0.96 0.7 0.18 0.015 0 0];
t = -2.5:0.5:2.5;

v = -0.000:-0.001:-1.999;


for ix1 = 1:length(v),
	    disp(ix1);
 for ix2 = 1:length(v),
  p = exp(v(ix1)*t.^2+v(ix2)*t.^4);
  r(ix1,ix2) = norm(p./max(abs(p)) - pp./max(abs(pp)));
 end;
end;