applyの引数２つ目が「１」か「２」かで行(=1)か列(=2)かが決まる． > tmp <- matrix(1:10,ncol=2,nrow=5) > tmp [,1] [,2] [1,] 1 6 [2,] 2 7 [3,] 3 8 [4,] 4 9 [5,] 5 10 > apply(tmp,1,sample) #行方向のシャッフル [,1] [,2] [,3] [,4] [,5] [1,] 1 2 8…