0
我可以创建一个从0到N列表和排列它。但是我怎样才能使它成为矩阵和排列每行只是从matrix(2,L)
。创建一个矩阵,并排列每一行
add(X,L,[X|L]).
add(X,[L|H],[L|R]):- add(X,H,R).
permut([],[]).
permut([L|H],R):- permut(H,R1),add(L,R1,R).
permutations(L,R):- findall(P,permut(L,P),R).
do_list(N, L) :- do_list1(N, [], L).
do_list1(0, L, L) :- !.
do_list1(N, R, L) :- N > 0,
N1 is N-1,
do_list1(N1, [N|R], L).
matrix(N,L):-
do_list(N,R),
permut(R,L).
你是说你想创建一个N×N!矩阵,其中每一行是同一个长度为“N”的列表的不同排列? – lurker
是的,我想创建N×N矩阵和排列每行,直到它变成拉丁方形 – user2947488