Changeset 123 for prdatasets/arrhythmia.m

Timestamp:

03/05/18 00:14:20 (7 years ago)

Author:

bduin

Message:

 

File:

• prdatasets/arrhythmia.m (modified) (3 diffs)

prdatasets/arrhythmia.m

@@ -11 +11 @@
 %
 % By default features with missing values are removed. When something else
-% is desired, use one of the options in MISVAL.
+% is desired, use one of the options in MISVAL for VAL.
 %
 % SEE ALSO <a href="http://37steps.com/prtools">PRTools Guide</a>, <a href="http://archive.ics.uci.edu/ml/">UCI Website</a>
@@ -18 +18 @@
 % Copyright: R.P.W. Duin, r.p.w.duin@prtools.org
 
-function x = arrhythmia(val);
+function x = arrhythmia(val)
+if nargin < 1,  val = 'f-remove'; end
+a = pr_getdata('http://prtools.org/prdatasets/arrhythmia.dat',1);
 
-prdatasets(mfilename,1,'http://prtools.org/prdatasets/arrhythmia.dat');
-if nargin<1
-        val = 'f-remove';
-end
 
-user.desc='The Arrhymthmia database from UCI. The aim is to distinguish between the presence and absence of cardiac arrhythmia and to classify it in one of the 16 groups.';
+user.desc=['The Arrhymthmia database from UCI. The aim is to ' ...
+           'distinguish between the presence and absence of cardiac ' ...
+           'arrhythmia and to classify it in one of the 16 groups.'];
 user.link = 'ftp://ftp.ics.uci.edu/pub/machine-learning-databases/arrhythmia';
 
@@ -48 +48 @@
 strcat('V4-',fl2) strcat('V5-',fl2) strcat('V6-',fl2)];
 
-a = load('arrhythmia.dat');
 x = pr_dataset(a(:,1:(end-1)),a(:,end));
 x = setfeatlab(x,fl);
 x = setname(x,'Arrhythmia normal');
 x = setuser(x,user);
-%x(:,14) = [];  % there are so many missing values, that I just remove this
-%               % don't do this, nice but confusing
 x = misval(x,val);
-% user.desc = [user.desc msg];
-% x = setuser(x,user);
-x = setlablist(x);
+
 return