Questions on finding existing Mathematica implementations or expertise to address a clearly stated problem.

learn more… | top users | synonyms

-4
votes
0answers
77 views

Bifurcation diagram for delayed dynamical system [on hold]

The delayed dynamical system describe as $\dot{x}(t)=y(t)-ax^3(t)+bx^2(t)-z(t-\tau)+I \\ \dot{y}(t)=c-dx^2(t)-y(t)\\ \dot{z}(t)=r[s(x(t)-e)-z(t)]$ where $a=1.0; b=3.0; c=1.0; d=5.0; r=0.006; s=4.0; ...
5
votes
3answers
284 views

How do I split a list of numbers to monotonic sequences?

Suppose I have: list = {1, 2, 4, 5, 7, 11, 8, 7, 3, 1, -3, -2, 6, 7, 80} And I want to split it to: ...
1
vote
0answers
43 views

Change “ListPlot” to 16 bit accuracy? [on hold]

I have (with the help of this forum) managed to plot a bifurcation diagram with the following code: ...
3
votes
2answers
317 views

Creating a bifurcation diagram of the logistics map [on hold]

I am brand new to Mathematica so please keep that in mind. I've run into trouble trying to make a bifurcation diagram. Here is what I have done: I have a function $f(x)$ that relies on a value $r$ ...
8
votes
1answer
136 views

How to construct the RHS of Wick's theorem

I've been trying this for a few days now, but I just can't seem to find an efficient (speed-wise) functional way to code the following task. Context: I would like to construct an expressions that is ...
1
vote
0answers
46 views

Different ways to program a recursive algorithm

Construct f (a numeric function) which takes multiple arguments with the following property: The single argument case $f(x_1)$ is meaningless, and the two-argument ...
-3
votes
1answer
78 views

How to implement Bifurcation of delayed Lorenz system? [closed]

The delayed Lorenz system is as follows: (Bifurcation parameter as $\tau$) $$\begin{align*} D^\alpha x_1(t) = & a_1(x_2(t-\tau)-x_1(t)) \\ D^\alpha x_2(t) = & a_2x_1(t)-x_2(t)-x_1(t)x_3(t) ...
5
votes
2answers
859 views

How to set up a simple Monte Carlo Simulation

there is a 1% chance that there will be a scattering event, if there is a scattering event the direction of scattering will be determined by a random sample of the custom[a_] function and if there is ...
2
votes
0answers
41 views

Changing from Cartesian to polar coordinates in partial differential equation [duplicate]

I have a partial differential equation: $$\left(x^2+y^2\right)\frac{{{\partial ^2}u(x,y)}}{{\partial {x^2}}} + x^2\frac{{{\partial ^2}u(x,y)}}{{\partial {y^2}}}=0$$ How to change from Cartesian to ...
7
votes
0answers
412 views

Problems when solving a nonlinear PDE system with NDSolve

The nonlinear PDE system is actually extracted from a research paper published in 2000 Here is the paper link The authors solved the system by using an ordinary differential equation integrator in ...
0
votes
1answer
148 views

How to write this Matlab code in Mathematica

I have a small hiccup here. I am trying to write my Matlab code for a dynamical system in Mathematica. I have managed to get most of it except one part. The Mathematica code for the system is ...
3
votes
0answers
115 views

Hopf Bifurcation for a non-linear dynamical system [closed]

I am very new to mathematica and also to Hopf bifurcation or any bifurcation for that matter. But I am trying to obtain a Hopf bifurcation for a dynamical system. Now, so far, I cannot find any ...
3
votes
1answer
75 views

How to create tickets on a Jira server using Mathematica?

Has anyone ever tried to use Atlassian's rest api from Mathematica? I'd love an example of a post request to create a ticket with specific properties. With cURL, it's easy: ...
1
vote
0answers
42 views

Coppersmith's algorithm like Pari's zncoppersmith?

Is there some Mathematica package (or built-in that I missed) available, more or less equivalent to Pari's zncoppersmith function? Paraphrasing that source: given ...
0
votes
0answers
43 views

how to use a tree as a key to construct a table of key values

I have an interesting problem that I was able to summarize in the form of trees, sets, and key value pairs. I have the following sets of keys and values \begin{equation} \begin{aligned} k_0 &= ...
2
votes
1answer
122 views

How do I make Mathematica show me the solutions that it has found while it is searching for them

How do I make Mathematica show me the solutions that it has found while it is searching for them, specifically in this: ...
5
votes
1answer
471 views

Linearized Einstein Equations with Mathematica

I need to compute the linearised Einstein Equations around a fixed metric $g_{\mu \nu}$ which is not the flat metric. Someone knows any Mathematica package or a review that can help me?
4
votes
0answers
128 views

Linearised Einstein equations

I need to compute the linearised Einstein Equations around a fixed metric $$g_{μν}=\text{Minkowski metric} + h_{μν}$$ which is not the flat metric. Does anyone know a Mathematica package or a ...
4
votes
1answer
86 views

Draw lines between all neighbours

I have seen this question, but what I want is a bit different. I have a set of data (blue points) and I would like to end up with something like this: , i.e. joining each site with all its ...
15
votes
3answers
1k views

How can this type of optical illusion be created in Mathematica?

I see these around the web and would like to make them in Mathematica. Combining them in an array is actually quite mesmerizing!
3
votes
0answers
72 views

Equilibrium solution to system of 4 ODEs with 6 parameters [closed]

I have the following system of 4 ODEs of 4 state variables $(M_{U},M_{R},F_{N},F_{M})$ and 6 parameters $(\alpha,b,\gamma,\mu_{M},\delta,\mu_{F})$ that I am trying to find the equilibrium solution ...
1
vote
2answers
79 views

Plot for pressure rise per wavelength [closed]

I have another question that i need to ask. I have been struggling in making the graphs for pressure rise per wavelenth. my equation for pressure rise per wavelength is: ...
0
votes
1answer
130 views
16
votes
6answers
3k views

3D surface that looks like a virus

I have been recently using Mathematica for composing animations that are part of the supplementary information of my papers. I am currently trying to build an animation that involves a viral ...
8
votes
1answer
439 views

How to create a Poincaré disk type kaleidoscope in Mathematica?

Creating a kaleidoscope in Mathematica is not a new topic at all, examples can be found from the links like Wolfram reference and Wolfram demonstrations. My question is how to create Poincaré disk ...
0
votes
1answer
123 views

Kronecker Delta and Contraction in Feyncalc

I am trying to simplify a rather complicated equation involving vectors and kronecker delta. I am trying to use Feyncalc for this purpose, but somehow i am not able to do it using Contract/Trick. ...
1
vote
0answers
88 views

Determining the order of continuity (smoothness) of a function

Is there any method to determine the order of continuity of a function (just like an interpolant) over a given domain, or at least determine the continuity on a given order? For example, according to ...
1
vote
2answers
378 views

Lyapunov exponent of a Henon map? [closed]

Can anyone help me with calculating Lyapunov exponent of 2D map, for example Henon map? If there is simple code, that would be great!
6
votes
1answer
91 views

How to delay the definition of a function from the time of package initialization to when it is first called

I am writing a package where a couple defined functions take a very long time define at initialization time (because they are large CompiledFunctions). However ...
1
vote
1answer
185 views

Import camera parameters and data from *.sif image files? [closed]

By default, Andor's line of scientific cameras saves data in an apparently undocumented *.sif format. Are there any Mathematica packages or code that can help import these data? I've inherited an ...
5
votes
0answers
151 views

Finding quasi-cliques

What is the best way to identify quasi-cliques in a graph in Mathematica? I don't think it has been implemented, so are there any solutions to do this? Or do I have to export the graph data somehow ...
3
votes
1answer
135 views

Solving a system of generated equations?

I would like to generate a function in the following form, where the number of terms can be specified arbitrarily: ...
2
votes
1answer
61 views

How do I center an item in a Grid?

I was trying to use Grid to align different plots, two on the first row, and only one in the second row, so I have something like this (where a,b and c are plots): ...
1
vote
2answers
173 views

intermediate steps of a Mathematica operation

How to make a multiplication or division, the intermediate steps. The numbers can be rational - decimals? it seems the OP merely wants Mathematica to show him how to multiply and divide the way ...
12
votes
1answer
204 views

Nearest Kronecker Product

Some people (see The ubiquitous Kronecker product by Van Loan) have worked on finding two matrices $\mathbf A$,$\mathbf B$ of specified size whose tensor product $\mathbf A\otimes\mathbf B$ is closest ...
3
votes
3answers
749 views

Sum over multiple indices

I would like to be able to enter the following left hand side of an identity. I can write the right hand side (i think) but am not sure about the left. The Left hand side is ...
2
votes
1answer
60 views

3D-Plot of a list of complex numbers and a list of real numbers

I'm a newcomer to Mathematica, and I'm having trouble with the following question. Say we have a list of complex numbers list1 and a list of real numbers ...
4
votes
1answer
98 views

Adding extinction factor to Monte Carlo analysis

I'm looking to add an absorption component to this Monte Carlo analysis, essentially I want there to be a 1% chance that a photon gets absorbed at each event as it travels through the medium, once the ...
30
votes
2answers
2k views

Playing with Matrix falling code in Mathematica

I was trying to create a Matrix falling code image with Mathematica. Here is my code: ...
5
votes
1answer
791 views

How to implement Kemeny-Young method? (rank aggregation problem)

Prehistory I am trying to make some statistical analysis of some experimental data, arises from measurements made ​​on an ordinal scale. I faced with the problem of rank aggregation: to get from ...
1
vote
1answer
626 views

Getting code from the Wolfram Demonstrations Projects [closed]

I saw from mathematica's website, there is a fantastic project about the 2D Riemann Sum. Riemann Sums For Functions of Two Variables I want to see the similar effect in my Mathematica (with ...
28
votes
2answers
3k views

How to build a bvh (a motion capture file format) player in Mathematica?

How to build a bvh player that can be used to visualize human motions in Mathematica? Any idea or sample code would be appreciated. ...
20
votes
3answers
3k views

Convert spectral distribution to RGB color

Presume I have a spectrum as a function of wavelength (an example being the blackbody spectrum): I want to convert that to a single RGB color to display on-screen, i.e. the "color" of that object ...
4
votes
3answers
829 views

Computing Gaussian curvature

Can Gaussian curvature $K$ be computed from WolframAlpha or any other available Mathematica program? Please indicate the program or its reference. If input ...
4
votes
1answer
57 views

How to canonically reorganize a list using only a limited set of manipulations?

I want to canonically reorganize (like Sort) a sequence of four objects seq[a,b,c,d], but the only manipulations allowed are ...
3
votes
0answers
202 views

adaptive histogram equalization

There is an interesting algorithm called contrast enhanced adaptive histogram equalization that does histogram equalization on small segments of an image (and then pastes them back together). I know ...
5
votes
1answer
364 views

How to program efficient undershoot/overshoot

I would like to solve the following boundary value problem for $y(x)$ for a fixed value of $k$ between $0 < k <1$: $$y'' + \frac{3}{x} y' - y + \frac{3}{2}y^2 - \frac{k}{2}y^3=0 \\ y'(0) = ...
7
votes
3answers
435 views

Calculating average distance between maxima

I'm having trouble figuring out a way to analyze some simple data. When graphed, the data I have make a somewhat sinusoidal curve. What I want to do is to find the x-values of the maximum peaks of the ...
0
votes
1answer
49 views

How to get the dynamic expression

$$Z_{n+1}=\frac{\alpha Z_n}{1+Z_{n-1}}$$ How to write the above expression in Mathematica? I want to get say Z_100, Z_10 by that scheme. Can I call say $Z_{10}$ if $Z_{n+1}$ is given?
52
votes
1answer
1k views

DumpsterDoofus's captivating generative art

How can I render these beautiful images that DumpsterDoofus posted?