Cartesian product of two or more lists: Difference between revisions
Cartesian product of two or more lists (view source)
Revision as of 00:33, 17 June 2021
, 2 years agoAdded Quackery.
(Added Quackery.) |
|||
Line 3,345:
[(1, 30, 500), (1, 30, 100), (2, 30, 500), (2, 30, 100), (3, 30, 500), (3, 30, 100)]
[]</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}}==
| |||