結果 : how to plot density function on top of histogram in r