x <- rnorm(10, mean=0, sd=1)
print(x)
##  [1]  1.1838955  1.4901385  2.0810738 -0.3470061  1.1316500  1.6342062
##  [7] -0.8877943  0.4554346  0.3501020 -1.4370649
# Calculate the probability density function (PDF) for a given x value
dnorm(x, mean=0, sd=1)
##  [1] 0.19794959 0.13144129 0.04575873 0.37563207 0.21029281 0.10495187
##  [7] 0.26900430 0.35964104 0.37522695 0.14205850
# Calculate the cumulative distribution function (CDF) for a given x value
y=pnorm(x, mean=0, sd=1)

# Calculate the inverse of the CDF for a given probability value
qnorm(y, mean=0, sd=1)
##  [1]  1.1838955  1.4901385  2.0810738 -0.3470061  1.1316500  1.6342062
##  [7] -0.8877943  0.4554346  0.3501020 -1.4370649