5
votes
2answers
287 views

f /@ # & /@ # & /@ # & /@ # & /@ # & /@ # & /@ # & /@ matrix

How can one write f /@ # & /@ # & /@ # & /@ # & /@ # & /@ # & /@ # & /@ matrix in one line with arbitrary level and without using ...
1
vote
1answer
73 views

LayeredGraphPlot how to change color of vertex box

For LayeredGraphPlot how to change the default yellow color? ...
13
votes
1answer
408 views

What is the confidence limit on this convergence?

Bug introduced in 7.0 and fixed in 10.0.0 When I run this, Product[n^MoebiusMu[n],{n,1,Infinity}] I get $\frac{1}{4 \pi^{2}}$ Over on Math Overflow ...
2
votes
2answers
181 views

VertexLabelStyle not found in Mathematica 8.0.0.0

I tried to use VertexLabelStyle, but seemed not recognized in my system with version number 8.0.0.0. Is this expected or I have missed something? From the online ...
2
votes
1answer
47 views

Definition of a function depending on a sequence

let $a_{n}$ is a given fixed sequence, say $a_{n}:=1/n$. I would like to define something like $$D_{j}:=\sum_{k=1}^{j}\frac{1}{j!}BellY[j,k,\{a_1,a_2,\dots,a_{j-k+1}\}].$$ Function BellY is ...
13
votes
1answer
390 views

Strange filling

Bug introduced in 9.0 and fixed in 10.0 I observed some strange behaviour when plotting a function with filling. The code is as follows: ...
3
votes
3answers
266 views

How would I write iterative code to try multiple coefficients for an equation?

So, I'm trying to solve a class of equations, and get all the solutions in a list. The general form looks like this: c == a*Sqrt[1-n] PlusMinus[b * Sqrt[n]] ...
3
votes
0answers
47 views

Unit of output changes when constant quantity is moved over integral

Why do these two expressions give the same result in different units? In: Integrate[ gravitationalAcceleration Quantity[1, "g/m^3"] fluidArea h, {h, 0, height}] ...
6
votes
2answers
212 views

How to check the validity of the value of PlotStyle option for 2D graph?

For the 2D graphic function like Plot, ParametricPlot, etc, which own a option PlotStyle. For instance, ...
0
votes
0answers
82 views

Weighting ListContourPlot point distances

This is related to contour plot (cartesian) using spherical coordinates postions Dear friends, 1) I got the following contour, using: the data : [data]1 ...
1
vote
0answers
59 views

Running a script that needs a package

I am running a resource extensive notebook, and so I am trying to break it down into a .m file so that I can run it quicker and without using the mathematica interface. The problem is that my notebook ...
1
vote
1answer
55 views

How could I check if a differential equation crosses a specific value? [closed]

I'm designing a magnetic field to simulate relativistic speeds in a small cyclotron. I need to see if the ratio -R/B * dB/dR crosses 0.2 in a certain range, and right now I'm trying to do that by ...
10
votes
1answer
217 views

Is there a practical way to define a default value for missing keys in an Association?

Clarification Although I may be missing his point I currently feel that Leonid's comments below are misleading. I am not looking for anything that is not already a part of ...
1
vote
1answer
107 views

Singularity problem of a 2nd order differential equation

I would greatly appreciate your help in implementation of Mathematica for solving a 2nd order differential equation expressing some important engineering problem. Apparently, this equation has no ...
2
votes
1answer
110 views

DateListPlot incorrect time zone [closed]

I'm trying to plot energy usage over time using datelistplot but the time zone on the ticks is wrong, data for 7pm shows as 3am The code: ...
12
votes
1answer
172 views

Why do singularities disappear when performing convolutions with the Dirac Delta function?

I am attempting to perform a convolution involving the Dirac Delta function: $\int_{-\infty}^{\infty} \frac{1}{t+1} \cdot \delta(t+1)\ dt$ I would expect that the result of this integral is ...
0
votes
0answers
53 views

NIntegrate within NMinimize - how to optimize the code?

How I can optimize these numerical calculations? Most annoying is encountering instabilities (numerical errors). I have a predefined function: ...
0
votes
1answer
66 views

How do I get the last three vectors to complete this cube?

Looking at this file, what vectors do I need to add to the cube:={...} in order to get a full cube?
1
vote
1answer
77 views

Find where a function does not depend on one of its argument

Say I have a function $f(x,y)$ with $x$ and $y$ in some domains. How do I find the subdomain in $y$ for which $f$ does not depend on $x$. My special case one could consider as an example: I have ...
1
vote
1answer
99 views

When to use Compile

I am new to Mathematica and have a general question: Working with matrices I have the impression that Compile can only be used if the elements of a matrix are ONLY Integers or ONLY Reals. No mixed ...
5
votes
3answers
182 views

How to change symbols in differential equation with a single rule?

Problem Suppose I have a differential equation such as $\qquad f'(x)+f(x)=0$ and I want to change it into $\qquad y'+y=0$ My Method Using rule = f[x] -> y,...
2
votes
1answer
270 views

How to move differentation before the integral?

I have quite a lot expressions that need to be integrated after switching the integral sign with differentiation operator. The additional problem is that the bounds are dependent to one of the ...
1
vote
2answers
225 views

FillingStyle and Opacity won't work together in Mathematica

I try to plot some data in Mathematica using the ListLinePlot[]. Unfortunately the plot option ColorFunction, ...
2
votes
2answers
315 views

Put markers in the maximum values in a Plot

I have made my graph of a list of data with the following code: ListLinePlot[data, PlotMarkers -> {Automatic, 10}] So this way I can see some markers in the ...
2
votes
1answer
234 views

Is there a keyboard shortcut for Centered Math Cell?

I've been typesetting in mathematica and would like to know if it is possible to use a keyboard shortcut to place a centered math cell or equation symbol aligned math cell in my document without ...
3
votes
1answer
44 views

Simplifying nested KroneckerProducts

Any suggestion how to bring a nested KroneckerProduct form into just one? I mean some how converting ...
0
votes
2answers
119 views

How to create a mirror-symmetrical list

My data file can be found here: data data = Import["mnl.out", "Table"]; First we remove the headers ...
0
votes
1answer
75 views

Only real numbers (Fullsimplify) [duplicate]

I've to do some complex calculation with Mathematica and if I put in my code it gives me something big back, so is it possible to say that my variables are strictly real numbers, by sing the ...
5
votes
2answers
499 views

How can I get WhenEvent to recognize criterion I specify?

Using NDSolve I want to solve a differential equation till a quantity which is a function of the dependent variables reaches a certain value. My functions and criteria are complicated, but I am able ...
9
votes
3answers
239 views

How to convert the binarize-picture to a Region

The Region of Mathematica is nice,and is the new conception of version 10.0.I can convenient get ...
7
votes
1answer
168 views

Optimal Binarize value for counting experiment

I am currently working on a physics experiment where I count particles. I have looked at and used a bit of code from the following sources: Cell counting from an image file and Count Elements in Image ...
5
votes
3answers
380 views

Rotating a circle about a larger circle

I've got some wonderful answers this morning on Mathematica Stack Exchange. See Diagonals of a regular octagon and Determine the height of a box packed with spheres. I'm just smiling with the amount I ...
2
votes
1answer
485 views

DSolve expression doesn't evaluate

Can Mathematica solve $\; d^2/dx^2{}+ (1/x) d/dx\;$ form of equations? For example, I am trying to solve the system of equations given below: ...
5
votes
1answer
120 views

How to use the ButterworthFilterModel to processing image

In the book of "Digital_Image_Processing_3rd" point out this: the 4.57a,4.57b,4.57c is like follow: So I do it according to the direction to: ...
0
votes
0answers
35 views

How to export a list of graphics to a multi-page PDF, each on its separate page? [duplicate]

I tried with these codes: g1 = GraphData[{"Complete", 8}] g2 = GraphData[{"Complete", 4}] Export["Graphs.pdf", {g1, g2}] SystemOpen["Graphs.pdf"] to shown these ...
1
vote
1answer
161 views

Optimization for inequalities in $\mathbb{C}$

I want to check when the expression $$ \sqrt{\sqrt{\lambda^{2}\left(2E+\lambda^{2}\right)}+E+\lambda^{2}} $$ is real, when it is purely imaginary and when it is complex (with imaginary part not zero)...
1
vote
0answers
100 views

Is this a bug in Mathematica 10.2 [closed]

I am using Mathematica 10.2.0.0 First, I define the following function ...
3
votes
1answer
423 views

Putting set elements into venn diagram

My problem has two parts. Before that I have two Lists/Sets. It suppose to be created them by two initial strings. In the first part, I need to show sets' elements in venn diagram. I can create venn ...
6
votes
2answers
334 views

Diagonals of a regular octagon

We had a little activity after school today and one of the questions was: All diagonals are drawn in a regular octagon. At how many distinct points in the interior of the octagon (not on the ...
1
vote
1answer
197 views

Manipulating local or external variable within NDSolve

I am wanting to save and use the value of a variable within NDSolve[] but without that variable being part of the equation itself. Code below (ODE for the Leaky ...
0
votes
1answer
162 views

How to make the plot smooth

There are some stranges point which cause the figure isn't smooth. I think that the reason is the method of numericial integration. Here is my code, it's pleasure that one can revise the drawbacks in ...
1
vote
0answers
251 views

Frame and white background not working (all other colours are fine)

Bug introduced in 6 and fixed in 7 Though my question my be related to this one, it doesn't look like it can easily be solved in the same way, so I hope not to be double-posting. I am trying to ...
16
votes
3answers
6k views

Find all roots of an interpolating function (solution to a differential equation)

I'm trying to find all the roots of the solution to a differential equation. Using NSolve or Reduce I don't get the roots, so I'm using an iterative method which I found in physicsforums.com. This ...
3
votes
1answer
235 views

Finding all zeroes - mysterious missing roots

Finding all the roots of a function of one real variable has been discussed extensively in e.g. Find all roots of an interpolating function (solution to a differential equation) (answer no. 2 by Jens ...
5
votes
1answer
102 views

How to get `FindCurvePath` to return only one list

As you can see below, FindCurvePath returns only a part of the list, resulting in a partial interpolation. I would like to interpolate all the points. Complete ...
11
votes
7answers
2k views

How to make a resizable chess board?

For some reason I need to create a chess board. I can create a chess board by following command: ...
2
votes
1answer
97 views

Long Processing time [closed]

I have access to a cluster and I was wondering if NMinimize[] with the "Differential Evolution" method could be used to parallel ...
10
votes
2answers
404 views

Determine height of box packed with spheres

I got such a wonderful answer regarding The Diagonals of a Regular Octagon, so I thought I'd try asking another question we had on our Pizza and Problem quiz activity at College of the Redwoods. The ...

15 30 50 per page