Question

如果L1 = [1,2,3]和L2 = [4,5,6],则L3 = [1,4,2,5,3,6]

http://code>shuffle([1,2,3],[4,5,6],[1,4,2,5,3,6]

我迄今为止已经这样做:

shuffle([X],[Y],[X,Y]).
shuffle([X|Xs],[Y|Ys],_) :- shuffle(Xs,Ys,Z), shuffle(X,Y,Z).

这是我第一次尝试撰写赞成意见书,因此我仍然试图把我头 wrap在 s子、规则和一切上。

我理解逻辑,我不敢肯定如何执行这一逻辑,这样,任何帮助都会受到极大赞赏!

Thanks!

<><>Edit>: 我已指出这一点。如果任何人有兴趣的话,可在此找到解决办法:

shuffle([X],[Y],[X,Y]).  
shuffle([X|Xs],[Y|Ys],[Z1,Z2|Zs]) :- shuffle([X],[Y],[Z1,Z2]),shuffle(Xs,Ys,Zs).

Answer 1

shuffle([], B, B).
shuffle([H|A], B, [H|S]) :- shuffle(B, A, S).

在这类问题上,通常困难的部分不是道歉,而是确定最简单的补偿关系,解决了这一问题。

Answer 2

这里简单的解决办法:

shuffle([], [], []).
shuffle([X|Xs], [Y|Ys], [X,Y|Zs]) :-
    shuffle(Xs,Ys,Zs).

将这一清单归纳为处理不平等的长度清单,是将基例改为:

shuffle(Xs, [], Xs).
shuffle([], Ys, Ys).

虽然这可能产生重复的解决办法。如果你不把“单向”这一前提视为“单向”。

(尽管我仍然认为,你应当称之为或interlace,而不是shuffle 。)