- added

git-svn-id: http://moon:8086/svn/matlab/trunk@153 801c6759-fa7c-4059-a304-17956f83a07c
2021-03-22 20:28:22 +00:00
parent 1b5742e13e
commit b31f3e7435
140 changed files with 6054 additions and 0 deletions
@@ -0,0 +1,15 @@
+% [xs,xsf] = phxs(x,ar,af,xsi)
+function [xs,xsf] = phxs(x,ar,af,xsi)
+
+N = lge(x);
+x = abs(x);
+xs(1) = xsi;
+
+for n = 2:N,
+  if(x(n) > xs(n-1))
+    xs(n) = ar*x(n) + (1-ar)*xs(n-1);
+  else
+    xs(n) = af*x(n) + (1-af)*xs(n-1);
+  end;
+end;
+xsf = xs(N);