0
votes
2answers
91 views

Gaps in plots of equation solution from parameter

I'm trying to plot solution of system of equations as a function of parameter ...
2
votes
2answers
430 views

Locator to show coordinates of plot

Old I would like to make the locator follow a plot, giving the coordinates as it moves. I don't really know where to start with this one, but I would like the dynamic plot to look something like ...
9
votes
2answers
406 views

In version 9 PlotLegends, how can I remove the strange edges that appear around LegendMarkers?

I'm running Mathematica version 9. I am using ListPlot to plot two sets of data. For each data set, I am using different ...
1
vote
1answer
111 views

Passing f[x][[1]] to FindRoot [duplicate]

FindRoot seems to fail for most examples of the form f[x_?NumericQ] := {x - 3 , x^3}; FindRoot[f[x][[1]], {x, 3}] ...
11
votes
4answers
324 views

Using With to scope over pure functions

Consider this example: given an option for a function func as "x" :> (a&), how can one assign different values to ...
4
votes
2answers
306 views

How and when to use Evaluate?

A month ago, I used Mathematica to solve my experiment of the Test Technology of Mechanics Engineering. The exeriment is mainly about the Fourier Transform and verify the validity of the theory of ...
6
votes
3answers
183 views

Using PatternTest and/or Condition to detect equal list lengths as well as list element formats

On searching Mathematica.SE for information about overloading functions, I came across several threads about PatternTest and ...
0
votes
0answers
54 views

What are ways to debug while Mathematica is running? [duplicate]

I would like to know if we can "watch some values" during running time of Mathematica. I remember that C and Pascal compiler ...
2
votes
1answer
262 views

Animated Wave Propagation using Fourier & InverseFourier

This is a continuation off of previous help on the first part of my project: fourier issue arising from input miscommunication Now I want to go one step further in the current code. Here's the code ...
10
votes
1answer
1k views

Extracting information from the result of ContinuousWaveletTransform

I'm trying to analysis a signal and identify some time-frequency information of it. For example, around which time the specific frequency arrives. It appears that Mathematica has very powerful wavelet ...
7
votes
1answer
143 views

Fixing Spline curves so as to not overlap with themselves - (Diagrams)

Statement of the problem: Conceptually, what I'm trying to achieve is pretty simple. I have some code that generates a set of diagrams from a list of sets of points using BSplineCurve. Certain ...
0
votes
0answers
81 views

DSolve is rejecting my description of a system of PDEs

I am trying to solve a system of partial differential equations using DSlove. But i get the input equations in return. Dsolve is not doing anything ...
0
votes
2answers
116 views

Where are the functional programming constructs: `every` and `some`? [duplicate]

Coming from other functional programming environments (e.g., Clojure) I've become accustomed to some functions that I haven't found equivalents for in Mathematica yet. The two I reached for last ...
0
votes
0answers
148 views
7
votes
3answers
226 views

How to Flatten Array of Arrays of the highest order in a simple way?

I have a matrix of matrices, given in the following code. I want to flatten the array... ...
4
votes
2answers
209 views

Why does Mathematica stop when run in the background in command line mode?

If I try to start a Mathematica script in the background from the command line, like this: math -script someFile.m & then the process gets automatically ...
0
votes
1answer
160 views

PDE Solving in mathematica

I'd like to ask how I might go about solving this equation: $\frac{\partial Ci}{\partial t} + \frac{1}{r^2}\frac{\partial (r^2 Ci)}{\partial r} = D\frac{1}{r^2}\frac{\partial}{\partial ...
1
vote
3answers
355 views

Can plot a function, NSolve takes too long

I'm new to Mathematica, so maybe mine is an easy to solve issue, but I haven't been able to figure it out. I have a series of linear ODEs I solve using for: ...
0
votes
3answers
95 views

Manipulate syntax

I am trying to manipulate a plot of the Bernoulli roots as follows: The following code clearly is not going to work, but I have included it in an effort to illustrate my meaning. ...
0
votes
2answers
230 views

Replace Do loop with Nest

...
1
vote
0answers
141 views

Exporting graphics to PDF results in destroyed fonts on Windows 8

Executing plot = Plot[x^2, {x, 0, 100}, PlotLabel -> "Plot"]; SetDirectory[NotebookDirectory[]]; Export["plot.pdf", plot, "PDF"]; results in Is this a bug? ...
1
vote
1answer
58 views

Option Inspector — option definitions

Relatively new to Mathematica, using v. 8.0.4.0 on OSX, and wanting to know where I can find something like a list of definitions for each of the many Global, Notebook, Cell, etc. options listed in ...
11
votes
1answer
219 views

How to find longest monotonic sequence?

I have a list, for example list = {2, 1, 3, 5, 4, 6} How to find longest ascending sequence of this list? There are two meanings of this question: Find the ...
2
votes
0answers
38 views

Syntax for FrontEnd`SelectionSetStyle

I know FrontEnd`SelectionSetStyle is undocumented, but its name suggests it does what I need. What is its syntax? I have already tried several variations of the ...
1
vote
1answer
148 views

Gradually coloring edges in terms of their vertices colors

In order to color Edges in a Graph after applying a function such as VertexDegree I did the ...
0
votes
1answer
128 views

Understanding distribution chart

How to explain DistributionChart function in mathematica, For example: if I have ...
1
vote
1answer
100 views

How accurate is Collect?

Background: I am trying to compute the Lyapunov exponent for the logistic map given by \begin{equation*} x_{n+1}=F(x_n)=ax_n(1-x_n) \end{equation*} The formula for the Lyapunov exponent for a given ...
1
vote
0answers
40 views

Get pattern from rising numbers [duplicate]

I am no mathematician or math star, yet wondering if there is a formula or a way to calculate what follows: I have series of numbers: ...
-2
votes
1answer
743 views

Convolution of two dirac delta functions

Why mathematica doesnt produce any answer to the following integral? Integrate[0.040608386793220284*DiracDelta[w]*DiracDelta[-w + x], {w, -2, 2}] and how can I ...
2
votes
0answers
84 views

TableHeading Lines Do Not Show Up

For a list list = {{"a", "b", "c"}, {"d", "e"}}; Table heading lines do not show up ...
-2
votes
1answer
151 views

Proof: Convergence of an equation and show the first derivative is bounded

We have the following equation \begin{equation} x(k+1)=\arccos\bigg( -\frac{1}{2(Dr^{\frac {|\sin(2x(k)+\theta)|}{M\sin x(k)\sqrt{A+2B\cos(2x(k)+\theta)}}}+1)} \bigg) \nonumber \end{equation} ...
2
votes
5answers
219 views

Treat list as cyclic

I am considering the following case. Say that T={p1,p2,p3} represents a triangle. In addition, I want to parameterize the edges of the triangle ...
2
votes
1answer
144 views

How to make an efficient difference of sets function?

How to write a nice code that removes all elements from given set A, that occur also in set B? I would like to use DeleteCases[] for this purpose, but have no good ...
0
votes
2answers
96 views

fourier issue arising from input miscommunication

xdomain = Table[i , {i, -10, 10, .1}]; ListPlot[InverseFourier[ Fourier[E^-#^2 & /@ xdomain]*E^#^2 & /@ xdomain]] So I want to numerically fourier ...
15
votes
1answer
815 views

How to remap a fisheye image?

I want to flatten a series of fisheye images by remapping them to a rectinlinear projection. To achieve this, I need to be able to remap the pixels of the image using fisheye correction formulas for ...
0
votes
2answers
186 views

NestWhile application

I have the function which take the last list in nested list, reduce it somehow in several ways so the length of list reduces and output new list wherein input list appended with defferent reduced ...
0
votes
0answers
104 views

Defining a curved region for NDSolve

I have an equation to solve using NDSolve which involves two parameters: $en$ and $k$. The equation produces a set of curves when $en$ is plotted against $k$. In ...
2
votes
1answer
389 views

How to combine two plots with the same y-axis

I have a data file which contains three columns of data. The first and the second column correspond to $x$ coordinates, while the third column to $y$ coordinate. Here is a small sample of the data ...
3
votes
2answers
348 views

How to show the coordinates of a point and the equation of a line dynamically? [duplicate]

I am constructing a diagram that consists of a sine curve and its tangent line at a given argument. However, I want to show the coordinates of the point of tangency and the equation of the tangent ...
1
vote
0answers
140 views

parameter NDSolve

the question I need to solve is: t x'[t] == -x[t] + y[t], t y'[t] == -5 t^2/x[t]^2 + x[t] - y[t], x[1] == 4, x[b] == 1 in order to solve the coupled ...
1
vote
1answer
223 views

Plot the solution complex transcendental equation

I'm trying to plot an implicit function satisfying a complex transcendental equation. The code is the following: ...
1
vote
1answer
68 views

What's wrong with the following Plot in Manipulate?

I try to show the convolution of a step function and a triangle function is smooth with the following code: ...
5
votes
4answers
594 views

How can I create an image like this

I'm trying to get an algorithm that generates a picture like this So far I've tried a little something with the help of the knowledge center, getting a graphics grid of squares already. But what ...
0
votes
0answers
160 views

Approximating a stochastic integral with a Wiener process

I would like some assistance to solve the following: $\sum\limits_{i=0}^{n-1} e^{-k(n\Delta t -i\Delta t)}\Delta z_i$ where $z$ is a Wiener process, $\Delta z_i = z((i+1)\Delta t)-z(i\Delta t)$. ...
1
vote
5answers
117 views

What's wrong with my implementation of SquareFreeQ?

This was a question I had last month: Part A: Looking at the exponent of each of the elements in the list, FactorInteger and using ...
1
vote
1answer
582 views

Taking the LCM of algebraic expressions

Is it possible in Mathematica to take the LCM of an algebraic expression? For example, I want to take the LCM of $9$, $9y$, ...
1
vote
1answer
314 views

Invert Colors Stylesheet White on Black

There have been a couple studies done that showed that white text on a black background increase recall of data. Although this is certainly debatable how might I invert the colors of Notebook font ...
2
votes
2answers
175 views

Nonlinear Optimization with conditional statement

I find Maximize doesn't work well under conditional statement. Here is an example. A car is driving up a slope. I want to find out the largest slope angle the car can drive upwards. I choose the ...
3
votes
2answers
334 views

Interpolating data with a step

Suppose I have some data with a step in it: data = {{1, 1}, {2, 2}, {3, 3}, {3, 4}, {4, 5}, {5, 6}}; Interpolation will complain about this and not give you an ...
6
votes
2answers
943 views

Too much whitespace in a GraphicsGrid containing Legended Plots

Where is all the vertical whitespace coming from, and how do I get rid of it? ...

15 30 50 per page