If you want to generate a distribution that peaks near 0.2 and has most of its density between 0 and 1, the following call to dsn() from the sn package comes close.
library(sn)
X <- seq(-1, 2, 0.01)
plot(X, dsn(X, xi = 0.1, omega = 0.3, alpha = 5), type = "l")
abline(v = 0.2)
Created on 2019-09-06 by the reprex package (v0.2.1)