Probando este documento
sample(5:20,10,replace = TRUE)
## [1] 16 5 15 19 13 12 17 20 16 11
sample(70:80,20,replace = TRUE)
## [1] 73 73 73 76 75 80 76 78 70 71 70 73 74 72 78 80 72 70 75 77