Changeset 123 for prdatasets


Ignore:
Timestamp:
03/05/18 00:14:20 (7 years ago)
Author:
bduin
Message:
 
Location:
prdatasets
Files:
2 added
5 edited

Legend:

Unmodified
Added
Removed

  • prdatasets/arrhythmia.m

    r96 r123  
    1111%
    1212% By default features with missing values are removed. When something else
    13 % is desired, use one of the options in MISVAL.
     13% is desired, use one of the options in MISVAL for VAL.
    1414%
    1515% SEE ALSO <a href="http://37steps.com/prtools">PRTools Guide</a>, <a href="http://archive.ics.uci.edu/ml/">UCI Website</a>
    … …  
    1818% Copyright: R.P.W. Duin, r.p.w.duin@prtools.org
    1919
    20 function x = arrhythmia(val);
     20function x = arrhythmia(val)
     21if nargin < 1,  val = 'f-remove'; end
     22a = pr_getdata('http://prtools.org/prdatasets/arrhythmia.dat',1);
    2123
    22 prdatasets(mfilename,1,'http://prtools.org/prdatasets/arrhythmia.dat');
    23 if nargin<1
    24         val = 'f-remove';
    25 end
    2624
    27 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.';
     25user.desc=['The Arrhymthmia database from UCI. The aim is to ' ...
     26           'distinguish between the presence and absence of cardiac ' ...
     27           'arrhythmia and to classify it in one of the 16 groups.'];
    2828user.link = 'ftp://ftp.ics.uci.edu/pub/machine-learning-databases/arrhythmia';
    2929
    … …  
    4848strcat('V4-',fl2) strcat('V5-',fl2) strcat('V6-',fl2)];
    4949
    50 a = load('arrhythmia.dat');
    5150x = pr_dataset(a(:,1:(end-1)),a(:,end));
    5251x = setfeatlab(x,fl);
    5352x = setname(x,'Arrhythmia normal');
    5453x = setuser(x,user);
    55 %x(:,14) = [];  % there are so many missing values, that I just remove this
    56 %               % don't do this, nice but confusing
    5754x = misval(x,val);
    58 % user.desc = [user.desc msg];
    59 % x = setuser(x,user);
    60 x = setlablist(x);
     55
    6156return

  • prdatasets/biomed.m

    r94 r123  
    1010%
    1111% By default objects with missing values are removed. When something else
    12 % is desired, use one of the options in MISVAL.
     12% is desired, use one of the options in MISVAL for VAL.
    1313%
    1414% This is the ''biomed' dataset of the <a href="http://lib.stat.cmu.edu/datasets/">StatLib Datasets Archive</a>.
     15% Just the original features 3, 5, 6, 7 and 8 are used.
    1516%
    1617% SEE ALSO <a href="http://37steps.com/prtools">PRTools Guide</a>, <a href="http://archive.ics.uci.edu/ml/">UCI Website</a>
    … …  
    2122function x = biomed(val)
    2223
    23 prdatasets(mfilename,1,'http://prtools.org/prdatasets/biomed.dat');
    24 if nargin<1
    25         val = 'remove';
    26 end
     24if nargin < 1, val = 'remove'; end
     25a = pr_getdata('http://37steps.com/data/prdatasets/biomed.dat',1);
    2726
    2827user.desc = 'The purpose of the analysis is to develop a screening procedure to detect carriers and to describe its effectiveness. ';
    … …  
    3130fl = {'age' 'measurement 1' 'measurement 2' 'measurement 3' 'measurement 4'};
    3231
    33 a = load('biomed.dat');
    3432x = pr_dataset(a(:,[3 5 6 7 8]),cl(a(:,end)));
    3533x = setfeatlab(x,fl);
    3634x = setname(x,'Biomed');
    37 [x,msg] = misval(x,val);
    38 user.desc = [user.desc msg];
    3935x = setuser(x,user);
     36x = misval(x,val);
    4037
    4138return

  • prdatasets/breast.m

    r94 r123  
    1313%
    1414% By default objects with missing values are removed. When something else
    15 % is desired, use one of the options in MISVAL.
     15% is desired, use one of the options in MISVAL for Val.
    1616%
    1717% SEE ALSO <a href="http://37steps.com/prtools">PRTools Guide</a>, <a href="http://archive.ics.uci.edu/ml/">UCI Website</a>
    … …  
    2222function x = breast(val)
    2323
    24 prdatasets(mfilename,1,'http://prtools.org/prdatasets/breastorg.dat');
    25 if nargin<1
    26         val = 'remove';
    27 end
     24if nargin < 1, val = 'remove'; end
     25%prdatasets(mfilename,1,'http://prtools.org/prdatasets/breastorg.dat');
     26
     27a = pr_getdata('http://37steps.com/data/prdatasets/breastorg.dat',1);
    2828
    2929user.desc='The original database of the Wisconsin Breast Cancer Databases from UCI, containing 699 instances, collected between 1989 and 1991. ';
    … …  
    3535'Normal Nucleoli' 'Mitoses'};
    3636
    37 a = load('breastorg.dat');
     37%a = load('breastorg.dat'); % Octave cannot find it
     38%a = load(fullfile(fileparts(which(mfilename)),'breastorg.dat'));
    3839J = find(a==-1);
    3940a(J) = NaN;
    … …  
    4243x = setfeatlab(x,fl);
    4344x = setname(x,'Breast Wisconsin');
    44 [x,msg] = misval(x,val);
    45 user.desc = [user.desc msg];
     45x = misval(x,val);
    4646x = setuser(x,user);
    4747

  • prdatasets/car.m

    r116 r123  
    88% 1(1), pp. 145-157, 1990.). All 6 features are nominal.
    99% The instances completely cover the attribute space.
     10
    1011function x = car
    1112
    … …  
    1617user.desc = 'Car Evaluation Database was derived from a simple hierarchical decision model originally developed for the demonstration of DEX (M. Bohanec, V. Rajkovic: Expert system for decision making. Sistemica 1(1), pp. 145-157, 1990.).';
    1718fl = {'buying price' 'maintenance price' 'nr of doors' 'nr of persons' 'luggage boot' 'safety'};
    18 
    19 x = pr_readdataset('car.data',0,',',[],'ccccccc',7);
     19 
     20datfile = fullfile(fileparts(which(mfilename)),'car.data');
     21x = pr_readdataset(datfile,0,',',[],'ccccccc',7);
    2022x = setfeatlab(x,fl);
    2123x = setuser(x,user);

  • prdatasets/chromo.m

    r81 r123  
    1313
    1414prdatasets(mfilename,1);
    15 a = pr_dataset('chromo');
     15datfile = fullfile(fileparts(which(mfilename)),'chromo');
     16a = pr_dataset(datfile);
    1617a = setname(a,'Chromosome Features');
Note: See TracChangeset for help on using the changeset viewer.