Cartesian product of two or more lists: Difference between revisions
Content added Content deleted
(Added Quackery.) |
|||
Line 3,345: | Line 3,345: | ||
[(1, 30, 500), (1, 30, 100), (2, 30, 500), (2, 30, 100), (3, 30, 500), (3, 30, 100)] |
[(1, 30, 500), (1, 30, 100), (2, 30, 500), (2, 30, 100), (3, 30, 500), (3, 30, 100)] |
||
[]</pre> |
[]</pre> |
||
=={{header|Quackery}}== |
|||
<lang Quackery> [ [] unrot |
|||
swap witheach |
|||
[ over witheach |
|||
[ over nested |
|||
swap nested join |
|||
nested dip rot join |
|||
unrot ] |
|||
drop ] drop ] is cartprod ( [ [ --> [ ) |
|||
' [ 1 2 ] ' [ 3 4 ] cartprod echo cr |
|||
' [ 3 4 ] ' [ 1 2 ] cartprod echo cr |
|||
' [ 1 2 ] ' [ ] cartprod echo cr |
|||
' [ ] ' [ 1 2 ] cartprod echo cr</lang> |
|||
{{out}} |
|||
<pre>[ [ 1 3 ] [ 1 4 ] [ 2 3 ] [ 2 4 ] ] |
|||
[ [ 3 1 ] [ 3 2 ] [ 4 1 ] [ 4 2 ] ] |
|||
[ ] |
|||
[ ] |
|||
</pre> |
|||
=={{header|R}}== |
=={{header|R}}== |