// 遞歸算法，很巧妙，但太費(fèi)資源
function getPermutation(arr) {
  if (arr.length == 1) {
    return [arr];
  }
  var permutation = [];
  for (var i = 0; i < arr.length; i++) {
    var firstEle = arr[i];         //取第一個(gè)元素
    var arrClone = arr.slice(0);      //復(fù)制數(shù)組
    arrClone.splice(i, 1);         //刪除第一個(gè)元素，減少數(shù)組規(guī)模
    var childPermutation = getPermutation(arrClone);//遞歸
    for (var j = 0; j < childPermutation.length; j++) {
      childPermutation[j].unshift(firstEle);   //將取出元素插入回去
    }
    permutation = permutation.concat(childPermutation);
  }
  return permutation;
}

function validateCandidate(candidate) {
  var sum = candidate[0] + candidate[1] + candidate[2];
  for (var i = 0; i < 3; i++) {
    if (!(sumOfLine(candidate, i) == sum && sumOfColumn(candidate, i) == sum)) {
      return false;
    }
  }
  if (sumOfDiagonal(candidate, true) == sum && sumOfDiagonal(candidate, false) == sum) {
    return true;
  }
  return false;
}
function sumOfLine(candidate, line) {
  return candidate[line * 3] + candidate[line * 3 + 1] + candidate[line * 3 + 2];
}
function sumOfColumn(candidate, col) {
  return candidate[col] + candidate[col + 3] + candidate[col + 6];
}
function sumOfDiagonal(candidate, isForwardSlash) {
  return isForwardSlash ? candidate[2] + candidate[4] + candidate[6] : candidate[0] + candidate[4] + candidate[8];
}

var permutation = getPermutation([1, 2, 3, 4, 5, 6, 7, 8, 9]);
var candidate;
for (var i = 0; i < permutation.length; i++) {
  candidate = permutation[i];
  if (validateCandidate(candidate)) {
    break;
  } else {
    candidate = null;
  }
}
if (candidate) {
  console.log(candidate);
} else {
  console.log('No valid result found');
}

//求模（非遞歸）全排列算法

/*
算法的具體示例：
*求4個(gè)元素["a", "b", "c", "d"]的全排列, 共循環(huán)4!=24次，可從任意>=0的整數(shù)index開(kāi)始循環(huán)，每次累加1，直到循環(huán)完index+23后結(jié)束；
*假設(shè)index=13（或13+24，13+224，13+3*24…），因?yàn)楣?個(gè)元素，故迭代4次，則得到的這一個(gè)排列的過(guò)程為：
*第1次迭代，13/1，商=13，余數(shù)=0，故第1個(gè)元素插入第0個(gè)位置（即下標(biāo)為0），得["a"]；
*第2次迭代，13/2, 商=6，余數(shù)=1，故第2個(gè)元素插入第1個(gè)位置（即下標(biāo)為1），得["a", "b"]；
*第3次迭代，6/3, 商=2，余數(shù)=0，故第3個(gè)元素插入第0個(gè)位置（即下標(biāo)為0），得["c", "a", "b"]；
*第4次迭代，2/4，商=0，余數(shù)=2, 故第4個(gè)元素插入第2個(gè)位置（即下標(biāo)為2），得["c", "a", "d", "b"]；
*/

function perm(arr) {
  var result = new Array(arr.length);
  var fac = 1;
  for (var i = 2; i <= arr.length; i++)  //根據(jù)數(shù)組長(zhǎng)度計(jì)算出排列個(gè)數(shù)
    fac *= i;
  for (var index = 0; index < fac; index++) { //每一個(gè)index對(duì)應(yīng)一個(gè)排列
    var t = index;
    for (i = 1; i <= arr.length; i++) {   //確定每個(gè)數(shù)的位置
      var w = t % i;
      for (var j = i - 1; j > w; j--)   //移位，為result[w]留出空間
        result[j] = result[j - 1];
      result[w] = arr[i - 1];
      t = Math.floor(t / i);
    }
    if (validateCandidate(result)) {
      console.log(result);
      break;
    }
  }
}
perm([1, 2, 3, 4, 5, 6, 7, 8, 9]);
//很巧妙的回溯算法，非遞歸解決全排列

function seek(index, n) {
  var flag = false, m = n; //flag為找到位置排列的標(biāo)志，m保存正在搜索哪個(gè)位置，index[n]為元素（位置編碼）
  do {
    index[n]++;    //設(shè)置當(dāng)前位置元素
    if (index[n] == index.length) //已無(wú)位置可用
      index[n--] = -1; //重置當(dāng)前位置，回退到上一個(gè)位置
    else if (!(function () {
        for (var i = 0; i < n; i++)  //判斷當(dāng)前位置的設(shè)置是否與前面位置沖突
          if (index[i] == index[n]) return true;//沖突，直接回到循環(huán)前面重新設(shè)置元素值
        return false;  //不沖突，看當(dāng)前位置是否是隊(duì)列尾，是，找到一個(gè)排列；否，當(dāng)前位置后移
      })()) //該位置未被選擇
      if (m == n) //當(dāng)前位置搜索完成
        flag = true;
      else
        n++;  //當(dāng)前及以前的位置元素已經(jīng)排好，位置后移
  } while (!flag && n >= 0)
  return flag;
}
function perm(arr) {
  var index = new Array(arr.length);
  for (var i = 0; i < index.length; i++)
    index[i] = -1;
  for (i = 0; i < index.length - 1; i++)
    seek(index, i);  //初始化為1,2,3,...,-1 ，最后一位元素為-1；注意是從小到大的，若元素不為數(shù)字，可以理解為其位置下標(biāo)
  while (seek(index, index.length - 1)) {
    var temp = [];
    for (i = 0; i < index.length; i++)
      temp.push(arr[index[i]]);
    if (validateCandidate(temp)) {
      console.log(temp);
      break;
    }
  }
}
perm([1, 2, 3, 4, 5, 6, 7, 8, 9]);

function swap(arr, i, j) {
  var t = arr[i];
  arr[i] = arr[j];
  arr[j] = t;

}
function sort(index) {
  for (var j = index.length - 2; j >= 0 && index[j] > index[j + 1]; j--)
    ; //本循環(huán)從位置數(shù)組的末尾開(kāi)始，找到第一個(gè)左邊小于右邊的位置，即j
  if (j < 0) return false; //已完成全部排列
  for (var k = index.length - 1; index[k] < index[j]; k--)
    ; //本循環(huán)從位置數(shù)組的末尾開(kāi)始，找到比j位置大的位置中最小的，即k
  swap(index, j, k);
  for (j = j + 1, k = index.length - 1; j < k; j++, k--)
    swap(index, j, k); //本循環(huán)翻轉(zhuǎn)j+1到末尾的所有位置
  return true;
}
function perm(arr) {
  var index = new Array(arr.length);
  for (var i = 0; i < index.length; i++)
    index[i] = i;
  do {
    var temp = [];
    for (i = 0; i < index.length; i++)
      temp.push(arr[index[i]]);
    if (validateCandidate(temp)) {
      console.log(temp);
      break;
    }
  } while (sort(index));
}
perm([1, 2, 3, 4, 5, 6, 7, 8, 9]);