clear
format short g

rand('seed',1);

d=5;
N=200;
w=2*rand(d,1)-1;
X=2*rand(N,d)-1;
y=X*w;

[sorty,iy]=sort(-y);
X=X(iy,:);
y=y(iy);

C=10;
[wLPsoft,ELPsoft,alp]=LinearRankerLPsoft(X,C);

yLPsoft=X*wLPsoft;

corr(y,yLPsoft,'type','Kendall')
