Hash transpose

transpose.rb

Hash.class_eval do
  def transpose
    reduce({}) do |rmemo, (rk, rv)|
      rv.reduce(rmemo) do |cmemo, (ck, cv)|
        cmemo[ck] ||= {}
        cmemo[ck][rk] = cv
        cmemo
      end
      rmemo
    end
  end
end