리스트 객체에도 동일하게 사용 가능하다.
> sample(list(a = 1, b = c(2, 3), c = c(3, 4, 5)), size = 2)
$c
[1] 3 4 5
$a
[1] 1
사실 sample() 함수는 괄호([ ])를 사용한 서브세팅을 지원하는 모든 객체에서 표본을 추출할 수 있다. 또 가중 표본 추출을 지원한다. 즉, 다음과 같이 각 요소에 대한 확률을 지정할 수 있다.
> grades <- sample(c("A", "B", "C"), size = 20, replace = TRUE, + prob = c(0.25, 0.5, 0.25)) > grades [1] "B" "B" "A" "A" "C" "B" "B" "B" "A" "C" "B" "C" "A" "A" "C" "B" "C" "A" "B" "B"
각 값이 몇 번씩 추출되었는지 알아보려면 table() 함수를 사용한다.
> table(grades)
grades
A B C
6 9 5