Create sample boolean vector of length 10

sample(c("Yes", "No"), 10, TRUE) #sample with replacement 
##  [1] "No"  "No"  "Yes" "Yes" "No"  "Yes" "No"  "No"  "Yes" "No"


Create sample numeric vector of length 15

sample(c(1:15), 15, FALSE) #sample without replacement 
##  [1] 15  2  1  7 11  3 14  8 13 10  4 12  5  9  6