runif.R

# Datos aleatorios equiprobables, distribución uniforme

# Ejemplo 1
# 10 números al azar entre 1 y 100

set.seed(10)
print(runif(10,1,100))

##  [1] 51.240342 31.370082 43.263859 69.617106  9.428461 23.318225 28.178522
##  [8] 27.958202 61.967101 43.537481

# Ejemplo 2
# 1000 números enteros al azar entre 1 y 10 y hacemos un histograma con ellos
nums <- trunc(runif(1000,1,101))
hist(nums)