読み込んだファイルをお手軽ランダムシャッフル． x0 <- read.table("Forward_Number_Sherlock.txt") x <- x0[,1] set.seed(10) y <- sample(x) write.table(y,"Shuffle10_Number_Sherlock.txt",append=FALSE,row.names=FALSE,col.names=FALSE,quote=FALSE)…