# 벡터의 길이 찾기 n
& gtn<- 길이 (x)
# 시작 1 끝 n-5 에서 임의로 숫자를 선택합니다.
& gtind & lt- 샘플 (n-4, 1)
# 마지막으로 5 개의 연속 찾기.
& gt 결과<- x[ind+0:4]