7,242 reputation
1450
bio website
location
age
visits member for 2 years, 10 months
seen 12 hours ago

Sep
15
comment Wrong answer from DSolve?
The answer satisfies $u(x) = \left(u'(x)-\frac{1}{n+1}\right)^2$.
Sep
14
comment Composition à la Mondrian
There is a "visual design" under the neat examples for grid that is a bit Mondrianish.
Sep
9
comment Creating a variable from Reduce[] output in Mathematica
x = c /. ToRules @ Reduce[...]
Sep
4
comment How to make a case insensitive sorted list and rename the file names of a given folder?
The built-in IntegerString will do what your NumberPad is doing.
Sep
3
comment Eliminate 3 Variable from 4 Equations
@Mr.Wizard Because I'm lazy and I already have more internet points than I can spend. But I found something interesting about the answer. Behold!
Sep
3
comment Eliminate 3 Variable from 4 Equations
If you get rid of the double angles first, it works fine. Try eq = TrigExpand @ {...
Aug
25
comment Missing arrow tips and colors
Graphics3D can take a list of primitives, so you don't need a separate Graphics3D for each arrow. You can also have nested lists to provide scoping for your styling. E.g. Graphics3D[{{Red, Arrow[...]}, Arrow[...], ...}]
Aug
25
comment Missing arrow tips and colors
PlotRange -> All?
Aug
20
comment Account for powers of 0 and 1 when defining function
Your could use arg1_ /; FreeQ[arg1, Plus] to ensure monomialism.
Aug
18
comment Removing Linear drift from an oscillating data
@jason Then as a further though, you might not want to just take every 5000th point raw for the interpolation. You might want to smooth it our first. MedianFilter could be a good choice.
Aug
11
comment Why is mathematica giving wrong and incomparable results for the integral?
Changing your 0.1 to a 1/10, integrating, then taking the numerical value gives 0.954517.
Jul
4
comment Finding corresponding vertex from 3d to 2d
@Aky Good point. Makes it look a bit nicer.
Jul
2
comment Difference (or intersection) of two convex polyhedra
I haven't looked at it myself, but there is some stuff here.
Jun
16
comment Smooth Peter de Jong attractor
Here's an animation where $a_1 \in [-2,2]$.
Jun
16
comment Is this the expected behaviour from Partition when padding is inserted at the start of the list?
myPartition[d_, k_] := Partition[d, k, k, -Mod[Length@d, k], {}]
Jun
4
comment Complement of multisets
I tend to use rules quite a lot because I think it is very clear what they do (although I admit the answer here is quite obfuscated). And yes, the performance does degrade with larger lists. But we don't want to prematurely optimise.
May
26
comment Plotting John Conway's Hecatohedron
This?
May
20
comment Finding the intersection of curves in a one-parameter family
NSolve[f[0] && f[2]]?
May
8
comment Strange opacity behavior
This is an awful lot of code and pictures for people to process. I recommend creating a minimal working example which has the problem. This will encourage more answers, and in the process you can often discover the solution yourself.
May
8
comment Specify the color of a horizontal grid line in a plot
GridLines -> {{}, {{Exp[EulerGamma], Red}}}