Sample from a skewed distribution in R

I want to sample numbers from a skewed distribution in R. Let's say I want to sample numbers from a distribution with mode 10 and 95% of values between 5 and 20.

Is there a function in R, similar to rnorm() or runif that can generate random numbers from such a distribution?