Creating logical vectors

c(TRUE, FALSE, NA, TRUE, FALSE)
## [1]  TRUE FALSE    NA  TRUE FALSE
sample(c(TRUE, FALSE), 
       10,
       replace = TRUE, # you get an error if omited 
       prob = c(.8, .2))
##  [1]  TRUE  TRUE  TRUE FALSE FALSE  TRUE  TRUE  TRUE  TRUE FALSE