Inverse Transform Sampling + R Demo