From 3f916032cc0b2efdeafb838dd10e1141ead2cb27 Mon Sep 17 00:00:00 2001
From: bgtushar
Date: Thu, 9 Nov 2017 20:51:40 +0530
Subject: cceps, fht, idct1, idct2, idst1, sigmoid, xcov1

---
 macros/xcov1.sci | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)
 create mode 100644 macros/xcov1.sci

(limited to 'macros/xcov1.sci')

diff --git a/macros/xcov1.sci b/macros/xcov1.sci
new file mode 100644
index 0000000..4c1f37e
--- /dev/null
+++ b/macros/xcov1.sci
@@ -0,0 +1,17 @@
+function [R,lag] = xcov1(X, Y, biasflag)
+
+funcprot(0);
+rhs = argn(2)
+if(rhs<1 | rhs>3)
+error("Wrong number of input arguments.");
+end
+
+	select(rhs)
+	case 1 then
+	[R,lag] = callOctave("xcov",X);
+	case 2 then
+	[R,lag] = callOctave("xcov",X,Y);
+	case 3 then
+	[R,lag] = callOctave("xcov",X,Y,biasflag);
+	end
+endfunction
-- 
cgit