6,482 reputation
11543
bio website
location
age
visits member for 2 years, 6 months
seen 17 mins ago

Jul
28
comment What is that Root[…] inside the answer represent?
A polynomial of degree 5 has up to five roots. $k=1$ means take the first one. For example, Root[#^2 - 100 &, 1] is $-10$, and Root[#^2 - 100, 2] is $10$.
Jul
27
awarded  Enlightened
Jul
26
awarded  Nice Answer
Jul
26
answered How can I mend this broken heart?
Jul
24
comment How to generate nonperiodic tilings?
Apparently the rt1s end up forming some of the dominoes and the rt2s end up forming the kites and the rest of the dominoes.
Jul
23
comment Is there a way to recreate the typical Red/Blue-Postereffect using Mathematica?
@blochwave, kale: I find that running Colorize on TotalVariationFilter@Sharpen@image works pretty well.
Jul
23
comment Is there a way to recreate the typical Red/Blue-Postereffect using Mathematica?
Half the reason I didn't post an answer was so that I wouldn't have to bother making the colours look good! So please, do direct any and all complaints towards @acl. Indeed, that blue is terrible, acl, what on earth were you thinking?!
Jul
23
comment Is there a way to recreate the typical Red/Blue-Postereffect using Mathematica?
@acl ColorFunction -> (Piecewise[{{Darker@Blue, # < 0.5}, {Red, # < 0.67}, {Darker@LightBlue, # < 0.75}, {LightYellow, True}}] &)
Jul
23
comment Using least independent rectangle area to separate every point
I thought @Kuba had something like this in mind: nf = Nearest[Table[data[[i]] -> i, {i, Length@data}], DistanceFunction -> ChessboardDistance]; Colorize@Table[First@nf@{x, y}, {y, 0.03, -0.03, -0.0001}, {x, -0.05, 0.03, 0.0001}] but it doesn't work that well: i.stack.imgur.com/T22XL.png
Jul
21
comment An easier way to find the properties of an ellipse from its equation?
I feel like the central question, "What is an intuitive way to find the major axis, minor axis, center, and rotation of an ellipse from its given quadratic equation?", is one better suited for the mathematics StackExchange. Once you have the mathematics, it should be short work to implement it in Mathematica.
Jul
21
comment Probable Bug in ConvexHullMesh
I can reproduce this on OS X as well.
Jul
20
comment 2D Arrangment/Optimization Problem
How about this: Fix $m=1$ and sort the entries of $A$.
Jul
20
comment Graphics3D flickers in Mathematica 10 and Linux
"do others experience this?" I've been using Mathematica 10 on Fedora 20 (64-bit) with Gnome 3.10 and an nVidia GeForce GTX 480 with nVidia drivers and I have not seen this problem.
Jul
20
comment how to generate mesh functions according to more that one condition?
@Algohi: You need to provide a list of functions, not a function that returns a list: MeshFunctions -> {Function[{x, y, z}, x], Function[{x, y, z}, z]}
Jul
20
comment How can I extract the outline of bubbles in my image?
I put the // ImageAdjust and // Colorize there to visualize what the intermediate steps are doing, because you can't tell anything from looking at d and w directly. I've updated my answer with a replacement for LocalAdaptiveBinarize.
Jul
20
awarded  Enlightened
Jul
20
revised How can I extract the outline of bubbles in my image?
added 426 characters in body
Jul
19
awarded  Nice Answer
Jul
19
answered Detect each polygons in an image
Jul
19
awarded  Cleanup