This should be reasonably fast:

function dist(F)
      s = sum(F,1)
      O = reshape(s, length(s)) ./ s
      for i = 1:size(O,1); O[i,i] = 0; end
      return O
end

Reply via email to