動作環境
RStudio 0.99.903 on Windows 7 pro
R version 3.3.1
参考 Rで学ぶデータ・プログラミング入門 by 石田基広さん
ズンドコの前準備。
> x<-c("zun","doko")
> sample(x,3,rep=T)==c("zun","zun","doko")
[1] TRUE TRUE FALSE
> sample(x,3,rep=T)==c("zun","zun","doko")
[1] TRUE TRUE TRUE
> sample(x,3,rep=T)==c("zun","zun","doko")
[1] TRUE TRUE TRUE
> sample(x,3,rep=T)==c("zun","zun","doko")
[1] TRUE TRUE TRUE
> sample(x,3,rep=T)==c("zun","zun","doko")
[1] FALSE FALSE FALSE
3回取出したものを==でチェックする。