可先建構矩陣,再使用apply及sample函數。我在之下舉了一個例子，您看看：
##先定義我的五組數據，分別為A,B,C,D,E,由十位數可知個別組的類別,譬如:10~15即為A組;20~25為B組，其餘類推
A=c(10,11,12,13,14,15)
B=10+A
C=10+B
D=10+C
E=10+D
##將這些組別組成矩陣
M=matrix(c(A,B,C,D,E),ncol=5);M
##使用apply,以"列"為依據,使用sample隨機抽取1筆數據
result=apply(M,2,sample,1);result