>>117
# ABCDEFGに対してなら
# BCDEFGAが一番勝率高い気がする

一番勝率高い探索順は４通りあった

> print(matrix(LETTERS[perm[p.max,]],ncol=7),quote=F)
[,1] [,2] [,3] [,4] [,5] [,6] [,7]
[1,] B C D E F A G
[2,] B C D E F G A
[3,] B C D E G A F
[4,] B C D E G F A