1
function res=mrses(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
mrses_hw(ctx, 15, Niter, block_size);
38
n = mrses_hw(ctx, 16);
41
H=[double(n)./Ncycle;1:genes];
42
res=flipud(sortrows(H'));