Timeline for How to select minimal subsets?
Current License: CC BY-SA 3.0
12 events
when toggle format | what | by | license | comment | |
---|---|---|---|---|---|
Jul 11, 2012 at 17:51 | comment | added | rm -rf♦ | @Mr.Wizard No. It does not copy to clipboard and the result in the temporary file it creates is also incorrect. For instance, right tee arrow is copied as subset | |
Jul 11, 2012 at 17:44 | comment | added | Daniel Lichtblau | Corrected version took 211.4 seconds. I inserted a remark about that in an edit; I do not wish to change the original post. | |
Jul 11, 2012 at 17:36 | comment | added | Mr.Wizard | Does Jens' solution above mine work for you? (copyAsUnicode) | |
Jul 11, 2012 at 17:26 | comment | added | rm -rf♦ | @Mr.Wizard Bitten by it again! Sadly, clip is not available for the Mac. No reason for Sequence... just artifacts of different trials hanging around | |
Jul 11, 2012 at 17:25 | comment | added | rm -rf♦ |
@DanielLichtblau Apparently the unicode that I used to make it look pretty isn't interpreted by Mathematica correctly as Function and Intersection respectively. Please see the edit for the verbose code
|
|
Jul 11, 2012 at 17:24 | comment | added | Daniel Lichtblau | The code below took 395 seconds on that example and returned the something the same size as the input. minRM[list_] := Fold[If[With[{u = #1~Join~{Union @@ #1}}, MemberQ[u, Alternatives @@ (x [RightTeeArrow] x â© #2) /@ u]], #1, {Sequence @@ #1, #2}] &, {First@#}, Rest@#] &@ Map[Sort, list, {0, 1}]; | |
Jul 11, 2012 at 17:22 | history | edited | rm -rf♦ | CC BY-SA 3.0 |
added 22 characters in body
|
Jul 11, 2012 at 17:10 | comment | added | Mr.Wizard |
You're using obscure Unicode. ;-p (More seriously, any reason for Sequence over Append ?)
|
|
Jul 11, 2012 at 17:02 | comment | added | rm -rf♦ | @DanielLichtblau Thanks, I've corrected it now. Please check it against your test (and possibly include the new timings). | |
Jul 11, 2012 at 17:02 | history | edited | rm -rf♦ | CC BY-SA 3.0 |
added 33 characters in body
|
Jul 11, 2012 at 16:14 | comment | added | Daniel Lichtblau | A large test I just did shows this variant giving a different result from the others. | |
Jul 10, 2012 at 18:01 | history | answered | rm -rf♦ | CC BY-SA 3.0 |