Reputation
11,712
Top tag
Next privilege 15,000 Rep.
Protect questions
Badges
1 10 35
Newest
 Nice Answer
Impact
~112k people reached

13h
comment NDSolve with shooting method
why are you not using the shooting method for the problematic solution?
15h
comment NIntegrate fails to converge around a value out of integration range
Since you know the function is well behaved in the region of interest you can always just manually sample and use trapezoidal rule, foregoing NIntegrates adaptive sampling and convergence checks of course. related mathematica.stackexchange.com/a/48360/2079
17h
comment Do loop not working as expected
a bit cleaner if you partition by 3: Partition[lst, 3][[2 ;; ;; 2]] // Flatten or Partition[lst, 3, 3, {1, 1}, {}][[2 ;; ;; 2]] // Flatten
17h
comment Why is ListPlot so slow here?
For reference creating essentially the exact same plot with Graphics/Point takes 0.0005 seconds (both versions..).
17h
comment Why is ListPlot so slow here?
I get ~0.5 seconds with v9/windows and ~6 seconds 10.1/linux
17h
comment frequency of punctuation characters used in Mathematica languages
I see, this is importing the entire low level notebook. Properly you need to just include the text of input cells..
18h
comment frequency of punctuation characters used in Mathematica languages
is that representative code? Odd for & , # to be low and ? so high..
18h
comment Reordering numerically calculated eigenvalues assuming smooth dependence on a parameter
if it doesn't need to be fully automatic, you might be best off to do some manual selection if that situation arises.
1d
comment Integral equation
i was just about to ask how the solution can not depend on d
2d
comment Showing all Digits
Table[N[1 + 10^(-n), n + 1], {n, 1, 30}] ( a bit specialized to the specific example, but that's what you asked.. )
2d
comment Reordering numerically calculated eigenvalues assuming smooth dependence on a parameter
sorry to not be much help, but I'm not surprised the linked solution doesn't scale well to such a large system.
2d
comment NSolve running for ever
any particular reason you choose the first two of four solutions returned by NSolve?
2d
comment NSolve running for ever
The holes in your plots are because the expression sometimes returns a small imaginary component. Give Plot the option WorkingPrecision -> 50 to fix that. Be sure to specify Theta exactly or to extended precision. Now plotting g1[H] - g2[H] - DeltaEn there don't appear to be any solutions for any Theta
2d
comment Apply NonlinearModelFit to an image
your Flatten.. code runs in about 5 seconds with some synthetic data.
2d
comment Plotting NIntegrate
you could achieve the same as this with Plot[ .. , PlotPoints->400,MaxRecursion->0] .. not really adressing the core issue though.
2d
comment Apply NonlinearModelFit to an image
are you saying the code show here is too slow? Or the NonLinearModelFit?
May
27
comment Export Text with Colors
the syntax here cant be right.
May
26
comment Plot3D and NIntegrate issues
not a bug, but it is a deficiency in the Plot3D docs that fail to mention that order matters if the range of one variable depends on the value of another.
May
26
comment How to send an “end-of-file” marker to a process object's standard input?
Afraid i have to point out, this answer works for "cat", but it wont do for a process that actually waits for stdin to close before generating output. Try sort for example..
May
26
comment NIntegrate and Sum give different results in summing functions
why would you expect NIntegrate[ .. {R,1,10^16}] to give the same result as Sum[ .. {R,1,1.5,0.001 }] ?