There is another way to calculate
Permutations [{1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11}]
without triggering an error, I have 3 GB of RAM with WIN 7
Edit:
This short code is the one that broke my head for a while, are 11 variables that must meet a very specific condition, their difference must be 1. either can take the 11 values, hence all permutations, this code is an adaptation of another code I saw here, which helps me to what I need.
juan[{a_, b_, c_, d_, e_, f_, g_, h_, i_, j_, k_}] :=
Abs[Differences /@ ({{a, b}, {a, c}, {b, c}, {b, f}, {b, e}, {c,
e}, {c, f}, {c, g}, {d, f}, {d, g}, {e, b}, {e, a}, {e, f}, {e,
i}, {e, h}, {f, g}, {f, j}, {f, i}, {f, h}, {g, i}, {g,
j}, {h, i}, {h, k}, {i, j}, {i, k}, {j, k}})] // Flatten
*(*per = Permutations[Range@11]*) (this line is calculated as 799 consecutive files in HD thanks to the collaboration of rasher)
(*per=Import["C:\\Users\\M\\Desktop\\per.txt"]*)(as I upload the files sequentially and that its securities are passing the variable "per" and will be prosecuted.?)
Select[per, FreeQ[juan@#, 1] &]
Combinatorica
package will generate them with incremental capability. A description of why you need this and what you'll do with it will help responses... $\endgroup$