7,507 reputation
1550
bio website
location
age
visits member for 3 years, 1 month
seen 20 hours ago

Mar
16
comment Quantum Physics question
It looks like the factor involving θ is a function that has equal positive and negatives bits, so it all integrates to zero. For example, h[0, 0, 1, 0] has a Cos[θ] Sin[θ] factor. Changing the range to {θ, 0, π/2} gives something more interesting, but I have no idea if that is a sensible thing to do for the problem.
Mar
11
comment Weird results of calculating a sum of binomials?
Put a GenerateConditions -> True in your sum and it will tell you when the answer is valid.
Mar
11
comment Generating Z^*_n
How about a Select over a simple range?
Feb
22
comment Built in function to convert list of numbers into list of binary numbers
There's BaseForm and IntegerDigits.
Feb
18
comment Error with using SortBy in a Map
You have an ampersand in the wrong place. You need SortBy[# , #[[2]] &]&
Feb
11
comment Adjusting contrast of a color scale with ListDensityPlot
Have you tried different colour schemes? Maybe "Rainbow" or "BrightBands". Have you tried a gamma correction instead of a log? Have you tried a ListContourPlot and specify the contours you want?
Feb
11
comment Nested mapping of a function
They are not the same if you define something for f. Try it with, say, f = #+1&.
Feb
10
comment Where does this gray solid line come from in plot?
I have expanded my comment into an answer. I agree that it is a good question. The simple answer is just one of those things you remember with experience.
Feb
9
comment Where does this gray solid line come from in plot?
Try Axes -> None
Dec
1
comment Fractals or other patterns in the quadruple linked pendulum
You could plot any plane through your four dimensional parameter space. You can also get three dimensions by creating a animation. Mathematica can allow you to manipulate the parameters to find interesting results. If you would show your code I'm sure we could make it fast enough to make these suggestions practical.
Nov
25
comment How to export a ParametricPlot3D as .stl for 3D printing
You could just put a /. Line -> Tube on the end of your plot.
Nov
25
comment Why `Delete` does not work?
I recommend looking into the Select and Cases functions.
Nov
24
comment How To Replace $\rightarrow$ by $==$ in Mathematica's Output when using Solve
You do just like you said in the title. Use a rule on the rules: Rule -> Equal.
Nov
20
comment NonlinearModelFit indeterminate or not a list of real numbers
You can put in conditions on the parameters to avoid non-real numbers, but you're going to have trouble no matter what you do. You have a Log[A3 x] in there and you are trying to fit to both positive and negative x values. So you are always going to get a complex result at some point.
Nov
13
comment Large Tuples with Negative Integers
You're trying to loop through 22185312344622607535965183080365494317672538611578408721 values? Good luck.
Oct
29
comment Display trailing zeros in ticks
There are a number of ways to set how a number is displayed: NumberForm, PaddedForm, SetPrecision. You could Map one of these over your ticks: {#, NumberForm[#, {5, 4}]}&/@ ticks.
Oct
28
comment Division by zero is slow
Clever and fast, but I'm going to wonder what the heck it is doing when I come back to read the code a few months later. Comments are for the weak.
Oct
28
comment Division by zero is slow
I like this answer the best. It's a bit wordy, but clear what it is doing. It's fast and flexible (if you want to do more than a simple divide). It's not quite so fast if you want to do a Normal afterwards - about the same speed as the case with no zeroes.
Oct
23
comment Why does integration of a radical times HeavisideTheta give a conditional expression?
I get the same as OP on the same version.
Oct
23
comment Ovals of plane curves (and esoteric surfaces in space)
It handles unbounded components. That was the original point - trying to distinguish those. You just can't make rectangles out of them. As for nested ovals, no idea!