Timeline for Plotting data points: Optimizing size and visuals
Current License: CC BY-SA 3.0
8 events
| when toggle format | what | by | license | comment | |
|---|---|---|---|---|---|
| S Apr 3, 2013 at 17:12 | history | suggested | Thomas | CC BY-SA 3.0 |
Added `filter2` for speed up
|
| Apr 3, 2013 at 17:09 | comment | added | Thomas | I have added another version of the filter, much faster than before. The difference is much more pronounced for larger data sets. Eg for 10^6 points: filter: 11 sec; filter1: 3.3 sec; filter2: 0.7 sec | |
| Apr 3, 2013 at 17:07 | review | Suggested edits | |||
| S Apr 3, 2013 at 17:12 | |||||
| Apr 3, 2013 at 14:00 | comment | added | jmlopez | @Thomas, I added your function to the answer. I should note however, that the modified version gives some extra points as compared to the one I wrote. Feel free to make adjustments to your function here or write a separate answer if you should desire and I'll delete my last edit. | |
| Apr 3, 2013 at 13:54 | history | edited | jmlopez | CC BY-SA 3.0 |
Added a modified version by Thomas
|
| Apr 3, 2013 at 10:35 | comment | added | Thomas | Your filter function can be sped up about 3-fold with this code: filter1[c_, uup_] := Module[{d = Split[c, Floor[First@#1, uup] === Floor[First@#2, uup] &], x, ord, y}, x = (#[[1]] & /@ (Transpose /@ d)); y = (#[[2]] & /@ (Transpose /@ d)); ord = Ordering /@ y; ord = {First@#, Last@#} & /@ ord; ord = Sort /@ ord; Join @@ MapThread[Part, {d, ord}]] | |
| Apr 3, 2013 at 1:30 | comment | added | Dr. belisarius | +1 It is really surprising how similar are all those curves | |
| Apr 3, 2013 at 1:15 | history | answered | jmlopez | CC BY-SA 3.0 |