function cluster_all_dimensions(wfb)
  [numcountries numdimns] = size(wfb);
  for i=1:numdimns
    cluster_analysis(wfb,i);
    pause;
    clf;
  end

