1  
   2  var a = ["A", "B", "C", "D"], q = 3, j = simpleArrange(a, q);
   3  document.write(
   4      "<h2>", a.join(" - "), " : ", q, " = ", j.length, "</h2>",
   5      j.join("<br />")
   6  );

   1  
   2  //+ Jonas Raoni Soares Silva
   3  //@ http://jsfromhell.com/array/simple-arrange [v1.0]
   4  
   5  simpleArrange = function(a, n, m){ //v1.0
   6      var o = a;
   7      if(n >= o.length) return [];
   8      for(var j, l, k, p, f, r, q = k = 1, i = (l = o.length) + 1, j = l - n; --i; i <= j ? q *= i : k *= i);
   9      for(x = [new Array(n), new Array(n), new Array(n), new Array(n)], j = q = k * q / q, k = l + 1, i = -1;
  10          ++i < n; x[2][i] = i, x[1][i] = x[0][i] = j /= --k);
  11      for(r = new Array(q), p = -1; ++p < q;)
  12          for(r[p] = new Array(n), i = -1; ++i < n; !--x[1][i] && (x[1][i] = x[0][i],
  13              x[2][i] = (x[2][i] + 1) % l), r[p][i] = m ? x[3][i] : o[x[3][i]])
  14              for(x[3][i] = x[2][i], f = 0; !f; f = !f)
  15                  for(j = i; j;)
  16                      if(x[3][--j] == x[2][i]){
  17                          x[3][i] = x[2][i] = (x[2][i] + ++f) % l;
  18                          break;
  19                      }
  20      return r;
  21  };

   1  
   2  //+ Jonas Raoni Soares Silva
   3  //@ http://jsfromhell.com/array/arrange [v1.0]
   4  
   5  arrange = function( v, n, m ){
   6   	for( var i, j, k, sep = sep || "", l = v.length, r = new Array( i = Math.pow( l, n ) ), c = ( new Array( n + 1 ) ).join( 0 ).split( "" ); i; )
   7  		for( r[--i] = new Array( j = n ), k = 1; j--; r[i][j] = m ? c[j] : v[c[j]], k && ( ++c[j] != l && --k, c[j] %= l ) );
   8  	return r;
   9  };

   1  
   2  document.write( arrange( ["A", "B", "C" ], 3, 1 ).join( "<br />" ), "<hr />" );
   3  document.write( arrange( ["A", "B", "C" ], 3, 0 ).join( "<br />" ) );