# Datos aleatorios normales, distribución normal
set.seed(10)
# Ejemplo 1
# 10 números al azar,media 100 y desviación típica 2
print(rnorm(10,100,2))
##  [1] 100.03749  99.63149  97.25734  98.80166 100.58909 100.77959  97.58385
##  [8]  99.27265  96.74665  99.48704
# Ejemplo 2
# 1000 números enteros al azar entre 1 y 100 con la misma media y desviación de antes y hacemos un histograma con ellos
nums <- trunc(rnorm(1000,100,2))
hist(nums)