function co=correlex(jk);
//illustrates correlations and histogram plot
// correlation needs an identity matrix as the third input 

ww=readingxls(0);
histplot(10,ww(:,13));

i41=eye(rand(41,41));
for i=1:1:13 co(i)=correl(ww(:,13),ww(:,i),i41); end;

endfunction;

