load risk_rate.dat

prox = risk_rate;

n=18;

best_vaf = 0.0;

store_vaf = zeros(10,1);

for i = 1:10
    [outperm,rawindex,allperms,index] = order(prox,targlin(18),randperm(18),17);
    store_vaf(i) = rawindex;
    
    %rawindex
    
    %outperm
    
    if (rawindex > best_vaf)
        best_vaf = rawindex
        best_find = outperm
    end
    
    %figure(i)
    
    %z = linkage(squareform(find),'complete')
    
    %dendrogram(z)
    
end

store_vaf'

sorted_vafs = sort(store_vaf')

