Mercurial > repos > public > sbplib

changeset 540:ef8003bdbc0d feature/grids

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge default
author Jonatan Werpers <jonatan@werpers.com>
date Tue, 08 Aug 2017 13:26:30 +0200
parents 08b6281ba2a9 (current diff) 13d2f20c0c0d (diff)
children 3377bedf371f
files
diffstat 1 files changed, 18 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
diff -r 08b6281ba2a9 -r ef8003bdbc0d spzeros.m
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/spzeros.m	Tue Aug 08 13:26:30 2017 +0200
@@ -0,0 +1,18 @@
+function S = spzeros(varargin)
+    switch length(varargin)
+        case 2
+            S = sparse(varargin{1}, varargin{2});
+        case 1
+            v = varargin{1};
+            switch length(v)
+                case 1
+                    S = sparse(v,v);
+                case 2
+                    S = sparse(v(1), v(2));
+                otherwise
+                    error('Input must be either one integer, two integers or a vector with two integers');
+            end
+        otherwise
+            error('Too many input arguments.');
+    end
+end