動作環境

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回取出したものを==でチェックする。