% Test code for the quaternion svd function. % Copyright
K-SVD 源代码
K-SVD是一种经典的字典训练算法,依据误差最小原则,对误差项进行SVD分解,选择使误差最小的分解项作为更新的字典原子和对应的原子系数,经过不断的迭代从而得到优化的解。
Using as Node:M68K-Float, Next:M68K-Directives, Previous:M68K-Moto-Syntax, Up:
function r=exchange3(R) N=length(R); K=fix(unifrnd(0,N)); J=fix(unifrnd(0,N-1)); I=fix(unifrnd(0,N-2)); if I==J J=J+1; …
function r=exchange3(R) N=length(R); K=fix(unifrnd(0,N)); J=fix(unifrnd(0,N-1)); I=fix(unifrnd(0,N-2)); if I==J J=J+1; …
function r=exchange3(R) N=length(R); K=fix(unifrnd(0,N)); J=fix(unifrnd(0,N-1)); I=fix(unifrnd(0,N-2)); if I==J J=J+1; …
function r=exchange3(R) N=length(R); K=fix(unifrnd(0,N)); J=fix(unifrnd(0,N-1)); I=fix(unifrnd(0,N-2)); if I==J J=J+1; …
function r=exchange3(R) N=length(R); K=fix(unifrnd(0,N)); J=fix(unifrnd(0,N-1)); I=fix(unifrnd(0,N-2)); if I==J J=J+1; …
function r=exchange3(R) N=length(R); K=fix(unifrnd(0,N)); J=fix(unifrnd(0,N-1)); I=fix(unifrnd(0,N-2)); if I==J J=J+1; …
function r=exchange3(R) N=length(R); K=fix(unifrnd(0,N)); J=fix(unifrnd(0,N-1)); I=fix(unifrnd(0,N-2)); if I==J J=J+1; …
function r=exchange3(R) N=length(R); K=fix(unifrnd(0,N)); J=fix(unifrnd(0,N-1)); I=fix(unifrnd(0,N-2)); if I==J J=J+1; …