R Density Plot Area Under Curve