added dist_hist.r