1
function res=mrses_mtx(A,B,k,Niter,Ncycle,distmod,block)
18
error('As minimum two matrixes needed for MRSES');
21
error('Too much parameters');
24
sa=size(A);sb=size(B);
28
error('Features dimension mismatch');
32
mrses_hw(ctx, 1, k, block, single(A), single(B), distmod);
34
for icycle=0:block:(Ncycle-1)
35
block_size = min(block, Ncycle - icycle);
36
% optki=mrses_hw(ctx, 15, Niter, block_size);
37
optki = [optki, mrses_hw(ctx, 15, Niter, block_size)];
39
% n = mrses_hw(ctx, 16);
42
%H=[double(n)./Ncycle;1:genes];
43
%res=flipud(sortrows(H'));