Changeset 137 for prdatasets/hepatitis.m

Timestamp:

12/18/19 15:46:35 (5 years ago)

Author:

bduin

Message:

 

Location:

prdatasets

Files:

• . (modified) (1 prop)
• hepatitis.m (modified) (1 diff)

prdatasets

@@ -3 +3 @@
 *.data
 *.asv
+data

@@ -3 +3 @@
 *.data
 *.asv
+data

prdatasets/hepatitis.m

@@ -1 +1 @@
 %HEPATITIS 155 objects with 19 features in 2 classes
 %
-%             X = HEPATITIS
+%             A = HEPATITIS
 %
 % The hepatitis database from UCI to predict if the patient will live or
 % die.
 %
-%             X = HEPATITIS(VAL)
+%             A = HEPATITIS(VAL)
 %
 % By default objects with missing values are removed. When something else
 % is desired, use one of the options in MISVAL.
 %
-% SEE ALSO <a href="http://prtools.tudelft.nl/prtools">PRTools Guide</a>, <a href="http://archive.ics.uci.edu/ml/">UCI Website</a>
+% SEE ALSO <a href="http://37steps.com/prtools">PRTools Guide</a>, <a href="http://archive.ics.uci.edu/ml/">UCI Website</a>
 % PRTOOLS, DATASETS, MISVAL
 
-% Copyright: R.P.W. Duin
+% Copyright: R.P.W. Duin, r.p.w.duin@37steps.com
 
-function x = hepatitis(val);
+function a = hepatitis(val)
 
-prdatasets(mfilename,1,'http://prtools.tudelft.nl/prdatasets/hepatitis.dat');
 if nargin<1
-        val = 'remove';
+  val = 'remove';
 end
 
-user.desc = 'The hepatitis database from UCI to predict if the patient will live or die.';
-user.link = 'ftp://ftp.ics.uci.edu/pub/machine-learning-databases/hepatitis/';
-cl = {'die' 'live'};
-fl = {'age' 'sex' 'steroid' 'antivirals' 'fatigue' 'malaise' ...
-'anorexia' 'liver big' 'liver firm' 'spleen palpable' 'spiders' ...
-'ascites' 'varices' 'bilirubin' 'alk phosphate' 'sgot' 'albumin' ...
-'protime' 'histology'};
-
-a = load('hepatitis.dat');
-x = pr_dataset(a(:,2:end),cl(a(:,1)));
-x = setfeatlab(x,fl);
-x = setname(x,'Hepatitis');
-[x,msg] = misval(x,val);
-user.desc = [user.desc msg];
-x = setuser(x,user);
+a = pr_loadmatfile;
+if isempty(a)
+  opt.delimeter = ' ';
+  opt.labfeat   = 1;
+  opt.featnames = {'age' 'sex' 'steroid' 'antivirals' 'fatigue' 'malaise' ...
+    'anorexia' 'liver big' 'liver firm' 'spleen palpable' 'spiders' ...
+    'ascites' 'varices' 'bilirubin' 'alk phosphate' 'sgot' 'albumin' ...
+    'protime' 'histology'};
+  opt.classnames = {'die' 'live'};
+  opt.desc = 'The hepatitis database from UCI to predict if the patient will live or die.';
+  user.link = 'ftp://ftp.ics.uci.edu/pub/machine-learning-databases/hepatitis/';
+  opt.dsetname = 'Hepatitis Data Set';
+  a = pr_download('http://prtools.tudelft.nl/prdatasets/hepatitis.dat',[],opt);
+end
+a = misval(a,val);

@@ -3 +3 @@
 *.data
 *.asv
+data