Reputation
7,070
Next privilege 10,000 Rep.
Access moderator tools
Badges
2 12 79
Impact
~67k people reached

Apr
30
comment My simulation is not never finishing and it is taking so much time?
Well, "need to plot" isn't a reason for using numerical solution. The analytic solution can be used for plotting, too!
Apr
29
comment My simulation is not never finishing and it is taking so much time?
Is numerical solution necessary? Your equations can be solved analytically by DSolve.
Apr
29
comment Difficulty in getting correct Gaussian curve for diffusion of point source
Related: mathematica.stackexchange.com/a/71945/1871
Apr
29
comment Laplace transform of $\frac{1-\cos (t)}{t}$
I think you actually mean p == 2 t and the final line should be LaplaceTransform[2 Sin[t/2]^2/t, t, s], right?
Apr
28
comment Solving coupled differential equations with an eigenvalue
Seems that this hasn't been done: Hello, welcome to Mathematica.SE! I suggest the following: 1) As you receive help, try to give it too, by answering questions in your area of expertise. 2) Read the faq! 3) When you see good questions and answers, vote them up by clicking the gray triangles, because the credibility of the system is based on the reputation gained by users sharing their knowledge. Also, please remember to accept the answer, if any, that solves your problem, by clicking the checkmark sign!
Apr
28
comment Numerical solution of IVP for linear ODE with variable coefficient runs wild soon
You may want to take part in the discussion here :D, currently the transformation can be done by Assuming[0 < t < Pi/2, dChange[{y''[x] == (x^2 - 1) y[x], y[0] == 1, y[Infinity] == 0}, ArcTan@x == t, x, t, y[x]]].
Apr
27
comment Numerical solution of IVP for linear ODE with variable coefficient runs wild soon
The "DifferenceOrder" seems not to be helpful here, at least when it's together with "ImplicitRungeKutta" or "ExplicitRungeKutta"
Apr
27
comment Subsituting expressions for expressions
@F.E. I don't think there's any serious downside, it's just OK to use a[c] and b[d] directly. Of course it's better to use With when there's a lot of a[c]/b[d] to write.
Apr
25
comment In WolframAlpha, how can I make a Scatter Plot without connecting points?
Seems that parentheses aren't necessary: wolframalpha.com/input/…
Apr
23
comment Better method to swap the values of two 2-D arrays
There are two $a_{k+1,k+1}$ in the matrix?
Apr
23
comment Solving coupled differential equations with an eigenvalue
I noticed that you've modified your equations for several times, are you sure it's correct this time? Maybe you can show us the original problem?
Apr
23
comment Bizarre Compile Error, changing one symbol
Where's the definition of nSites?
Apr
21
comment Solving coupled differential equations with an eigenvalue
As mentioned above, ϕ[Ei] == 0 and ϕ'[Ei] == 0 give two equations, use either of them inside FindRoot or RootSearch will give you a result.
Apr
20
comment Analogue for Maple's dchange - change of variables in differential expressions
Your design for the syntax is undoubtedly more Mathematica-like and more reasonable. (I admit that when writing the question I haven't deliberated on the syntax design. )
Apr
18
comment Analogue for Maple's dchange - change of variables in differential expressions
@m0nhawk Well, as I mentioned above, that's just one of the related questions that are not general enough.
Apr
18
comment Integro differential eq boundary difficulties
I suggest you to add the $LaTeX$ or screenshot of your original PDE to your question. BTW, a simple mistake is exp should be Exp.
Apr
18
comment NDSolve to solve a PDF
"Numerically, using the method of lines (the default in this case), condition 1 is not integrated." Yeah, actually this has been (vaguely) mentioned in the possible issue of DiracDelta: Numerical routines will typically miss the contributions from measures at single points.
Apr
18
comment Solving coupled differential equations with an eigenvalue
What approach do you want to take for finding Ei? b[Ei] actually returns 2 InterpolatingFunction while you only have 1 unknown! If you replace the {ϕ, A} inside ParametricNDSolve with ϕ or A, you'll get a solution, whether the solution is correct or not is another story. BTW, you may want to try this package: library.wolfram.com/infocenter/Demos/4482
Apr
15
comment 3D scatter plot with labels
Show[Graphics3D[{Blue, PointSize[0.02], Point[data]}], Graphics3D[ Text[#[[1, 1]], 1.04*#[[2]]] & /@ Transpose@{labels, data}], Axes -> True, BoxRatios -> 1]
Apr
14
comment Trying to model Heat flow trough different materials with NDsolve
BTW, let alone the vagueness of this question, how to Implement heat flux continuity condition is indeed a interesting question, I do find a solution for this, but not that general and I'm not satisfied. I'm hesitating whether I should post it as an answer or start a new question, which will of course state the problem in a clearer way.