Commit ae97da136c24fe3f9ad46844afb4388fd3827b83

Authored by Josh Klontz
1 parent 3fdeded5

don't think we need these matlab files anymore

share/openbr/matlab/loadBin.m deleted
1 -function [x2] = loadBin(filename,reverse)  
2 -% [x2] = loadBin(filename,reverse)  
3 -  
4 - if nargin < 2,  
5 - reverse = false;  
6 - end  
7 -  
8 - z = fopen(filename,'r');  
9 - if z == -1,  
10 - fprintf('Error opening file %s\n',filename);  
11 - x2 = 0;  
12 - return  
13 - end  
14 -  
15 - x = fread(z,1,'int32');  
16 - x1 = fread(z,1,'int32');  
17 - x2 = fread(z,[x1 x],'float32');  
18 - x2 = x2';  
19 - fclose(z);  
20 -  
21 - if reverse,  
22 - sz = size(x2);  
23 - x2 = x2';  
24 - x2 = reshape(x2,sz);  
25 - end  
share/openbr/matlab/loadMtx.m deleted
1 -function [x2] = loadMtx(filename,isRowMajor)  
2 -% [x2] = loadMtx(filename,reverse)  
3 -%  
4 -% Loads a *.mtx file into a Matlab matrix.  
5 -% 'filename' - the name of the mtx file  
6 -% 'isRowMajor' - determines whether the  
7 -% matrix is read in row major or  
8 -% column major order (optional, default is false)  
9 -%  
10 -% This file can likely be improved in terms of effeciency.  
11 -  
12 -  
13 - if nargin < 2,  
14 - reverse = false;  
15 - end  
16 -  
17 - z = fopen(filename,'r');  
18 - if z == -1,  
19 - fprintf('Error opening file %s\n',filename);  
20 - x2 = 0;  
21 - return  
22 - end  
23 -  
24 - buf = zeros(100,1);  
25 - str_list = cell(4,1);  
26 - for i = 1:4,  
27 - cnt = 0;  
28 - while true  
29 - cnt = cnt + 1;  
30 - [a ] = fread(z,1,'uchar');  
31 - if a == 10  
32 - break;  
33 - end  
34 - buf(cnt) = a;  
35 - end  
36 - str_list{i} = char(buf(1:cnt-1)');  
37 - end  
38 -  
39 - s = strsplit(' ',str_list{4});  
40 - x = str2num(s{2});  
41 - x1 = str2num(s{3});  
42 - typ = s{1}(2);  
43 -  
44 - %x2 = fread(z,[x1 x],'float32');  
45 - if strcmp(typ,'F')  
46 - x2 = fread(z,[x1 x],'single');  
47 - elseif strcmp(typ,'B')  
48 - x2 = fread(z,[x1 x],'int8');  
49 - else  
50 - assert(0);  
51 - end  
52 - x2 = x2';  
53 - fclose(z);  
54 -  
55 - if reverse,  
56 - sz = size(x2);  
57 - x2 = x2';  
58 - x2 = reshape(x2,sz);  
59 - end  
60 \ No newline at end of file 0 \ No newline at end of file