%Race Pt
for i=1:7,
 ii=(ind(i):ind(i+1));
 wind=wlp(ii,26);
 u=wlp(ii,6);
 i2=find((u+wind)~=NaN);
 if(length(i2)~=0),
    [mn(i),std1(i),mean2(i),std2(i),corr(i),tr(i)]= stats(wind(i2),u(i2),1);
 end
end
for i=1:7,
 ii=(ind(i):ind(i+1));
 wind=wlp(ii,26);
 u=wlp(ii,7);
 i2=find((u+wind)~=NaN);
 if(length(i2)~=0),
    [mn(i),std1(i),mean2(i),std2(i),corr(i),tr(i)]= stats(wind(i2),u(i2),1);
 end
end
for i=1:7,
 ii=(ind(i):ind(i+1));
 wind=wlp(ii,26);
 u=wlp(ii,8);
 i2=find((u+wind)~=NaN);
 if(length(i2)~=0),
    [mn(i),std1(i),mean2(i),std2(i),corr(i),tr(i)]= stats(wind(i2),u(i2),1);
 end
end
for i=1:7,
 ii=(ind(i):ind(i+1));
 wind=wlp(ii,26);
 u=wlp(ii,9);
 i2=find((u+wind)~=NaN);
 if(length(i2)~=0),
    [mn(i),std1(i),mean2(i),std2(i),corr(i),tr(i)]= stats(wind(i2),u(i2),1);
 end
end
