McNuggets problem: Difference between revisions
Content added Content deleted
(→{{header|JavaScript}}: (bindList -> .flatMap)) |
(Add Factor example) |
||
Line 396: | Line 396: | ||
printfn "%d" (Set.maxElement(Set.difference (set[1..100]) (fN 20 0|>Seq.collect(fun n->fN 9 n)|>Seq.collect(fun n->fN 6 n)|>Set.ofSeq))) |
printfn "%d" (Set.maxElement(Set.difference (set[1..100]) (fN 20 0|>Seq.collect(fun n->fN 9 n)|>Seq.collect(fun n->fN 6 n)|>Set.ofSeq))) |
||
</lang> |
</lang> |
||
{{out}} |
|||
<pre> |
|||
43 |
|||
</pre> |
|||
=={{header|Factor}}== |
|||
<lang factor>USING: backtrack kernel math.ranges prettyprint sequences sets ; |
|||
101 <iota> [ 0 6 9 20 [ 100 swap <range> amb-lazy ] tri@ ] bag-of diff last .</lang> |
|||
{{out}} |
{{out}} |
||
<pre> |
<pre> |