0
votes
2answers
130 views

Outputting a film (in .avi, .mp4, etc. formats) where frames correspond to Graphics3D outputs

I'd like to make a exportable film (in some format like .avi or .mp4, something playable on most computers) where each frame is a Graphics3D output. For example, we might generate frames in the ...
1
vote
2answers
1k views

How to remove ConditionalExpression from output

I need define the function with parameter so I could directly generate a power series expansion. The problem is that in some cases ConditionalExpression appears in output. Here is my code: ...
4
votes
2answers
152 views

NMaximize the Likelihood

I am still pretty new to Mathematica, but have to solve a quite complex problem. The function ...
7
votes
1answer
2k views

Entering numbers in Scientific Notation?

I need to play with a lot of powers such as 10^-3. 1E-3 does not work for it. Is there any short form for it?
3
votes
0answers
206 views

Optimization with Matrix value constraint

I am trying to find the orientation and position of a polygon resting on a curved surface under gravity.The polygon MUST not be penetrated by any part of the surface below. Here is an example for a ...
6
votes
1answer
426 views

Mathematica 9 Citation

I want to cite Mathematica 9.0.1 in my paper, but the standard citation is not available here http://support.wolfram.com/kb/472. Can you let me know where I can find it or give me one good sample (I ...
4
votes
1answer
322 views

Strange result for the analytic integration leads to Hypergeometric2F1

The integration result for Integrate[1/(r^2 Sqrt[x/r^(4 - 2 \[Gamma]) + 1]), r] is: ...
1
vote
1answer
499 views

Solving a system of non-linear differential equations

I want to solve the system of non-linear differential equations given below numerically. $$y''(t)+500y'(t)+100y(t)=-33\cos(500t)-66\cos(1000t)$$ $$300x'(t)=1000y(t)+500y'(t)-35\tanh(50x'(t))$$ ...
4
votes
2answers
274 views

How to determine coordinates of a shape in an image?

I have a pre-processed image, from which I have to get coordinates of some components. There are 7 green components (pigs actually) that I have already isolated from an angry bird screen shot. So ...
3
votes
4answers
232 views

Pattern matching in nested lists

I'm sure this has been asked before, but I can't find the right combination of search keywords to find it. Apologies. I want to do a ReplaceAll on a list of lists, ...
1
vote
1answer
148 views

Plotting - recursive

Slightly clearer, hopefully: I would like to plot Solve[Normal[Series[E^(n x), {x, 0, n}]] == 0 for incrementally increasing n, and show all plots overlayed. Here is my effort with up to n=63 using ...
13
votes
2answers
346 views

Change base font for all graphics objects

How can I change the base font style for all graphics objects, including the ones generated using plotting functions? I would like to change this a single time and have it affect all graphics ...
5
votes
1answer
326 views

ListPlot3D of a set of points in a non-convex region

I would like to plot a set of points in the same style as ListPlot3D does, but only in a non-convex region that I can specify (e.g. using a ...
5
votes
2answers
361 views

How to import a “.numbers” spreadsheet?

Does Mathematica support importing a ".numbers" spreadsheet file (from the "Numbers" '09 (ver. 2.3 554) spreadsheet program in Apple's OS X iWork office suite)? A ".numbers" file is actually a zip ...
0
votes
3answers
193 views

Conversion of binary matrix of mlf into multilinear function, any ready function for this?

I convert here only one term $x_1x_3x_7$ from the binary matrix by first getting the reversed binary 1010001 and then miggling with the data. I know I could convert the columns into binaries and then ...
1
vote
2answers
61 views

How to get monomials multiplied by each other?

Suppose Subscript[x, #] & /@ {1, 3, 7} that returns {x_1,x_3,x_7}. Now how can I get ...
1
vote
1answer
60 views

How to extract data beginning on the closest number to zero?

I have a list from which I want to extract only the values beginning from where b (from {a,b}) is the closest to zero. For example: I want extract data={{2, -0.036704}, {56.7499, 0.95489}, {73.7349, ...
3
votes
1answer
274 views

Specifying coordinates for Inset on a LogPlot

If I use Epilog->Inset within a Plot, the coordinates specified within that Inset match ...
4
votes
1answer
162 views

Dark artifacts in mathematica plot

When plotting in Mathematica I just got some "dark artifacts". Here is my code: ...
2
votes
2answers
218 views

Calculate information entropy integral in infinite square well problem

In the context of information theory, entropy is a measure of uncertainty of a random variable. In quantum mechanics, the uncertainty principle states that $\Delta x\Delta k \ge 1/2$. The same can be ...
0
votes
1answer
120 views

Export vector images

I am having difficulties exporting vector graphics. Using Kardashev3's code provided here: ...
0
votes
3answers
137 views

Speed up manipulate by exporting each step as an image

Consider a manipulate function such as: ...
1
vote
1answer
178 views

Show multiple plots with single variable

Using the same example code as in this question, is it possible to show all 10 plots (ie, each step of the manipulation) simultaneously? If a manipulate function is a series of listplots based on a ...
8
votes
6answers
674 views

How to draw symmetrical parts of a circle

Let's consider the following simple case: ...
9
votes
1answer
322 views

Inconsistent results of second derivative of inverse fourier transform

I am trying to get the Green's function of a toy diffusion equation $$\frac{\partial^2 u(x,t)}{\partial x^2} = \frac{1}{\alpha^2}\frac{\partial u(x,t)}{\partial t}$$ with Mathematica 9. Then solve ...
0
votes
1answer
83 views

How do you ContourPlot3D an implicit function of x,y, and z?

This is what I am trying to do: ContourPlot3D[4 Log[x^2 + y^2 + z^2] == 1, {x, -10, 10}, {y, -10, 10}, {z, -10, 10}] but all I get is the empty box. Can anyone ...
2
votes
1answer
109 views

Why is FileNameJoin not working?

I can not figure out why the code below doesn't work? aaa >> FileNameJoin[{Directory[],"input"}] error message came out saying OpenWrite::noopen: ...
2
votes
2answers
346 views

Is there a way to plot a single level curve of a function of x and y through a given point?

For example, I am trying to plot the single level curve of f(x,y)=xsin[y/x]+ysin[2x] that goes through the point (3pi,3pi). Can anyone show me how to do this?
3
votes
2answers
139 views

How to partition a list according to a nested table structure?

This question is related to this quesion. The goal is to use ParallelMap to map a function to a nested Table to get the ...
-1
votes
1answer
211 views

Efficient Table Generation & NDSolve Error

I'm currently working on solving an SEIR model with data from the CDC. I've created a function to calculate the Square difference for the model and want to create a table of values for the 4 variable ...
3
votes
3answers
143 views

Lists - pairing up

I have two (fairly large) lists of equal length & would like to pair them up. eg - from: a = {{0, 1}, {0, 2}, {0, 3}}; b = {{1, 2}, {1, 3}, {1, 4}}; I would ...
11
votes
1answer
758 views

Any way to make my equations look better, more Latex like?

I find that the equations I write in Mathematica are not always publication quality. Here is a typical example: If I copy as Latex, then I get the following code: ...
1
vote
3answers
277 views

Matlab-style Find in Mathematica? Value list and Boolean List, how to select values according to the boolean list?

I want to select elements with the true value (Indices list) in the corresponding point to the value list (MCS). Is there anything like Matlab-style Find to get the indices of true values in the ...
10
votes
2answers
133 views

Rasterize uses default stylesheet if ImageSize is specified

If I make a style definition which affects GraphicsBox, the style is used by Rasterize unless I specify an explicit ...
2
votes
2answers
132 views

How to select a certain portion of a piecewise function?

For example, if I have Piecewise[{{x^2, x < 0}, {x, x > 0}}], how do I select only the function that is for x < 0? I ...
3
votes
1answer
187 views

Define a function with the condition that it must be positive

I have a function f(x) and I want to define a new function g(x) that is equal to f(x) only ...
15
votes
4answers
1k views

Finding the volume of a sphere using the Monte Carlo algorithm

I used the following code to find the volume of the sphere $x^2+y^2+z^2 = 1$ in the first octant: ...
5
votes
3answers
230 views

Calculate integral for arbitrary parameter n in infinite square well problem

I'm continuing[1,2] the study of an infinite square well in the context of quantum mechanics. Ultimate goal is to calculate the product $\Delta x\Delta k$, for various eigenstates, that is for ...
2
votes
2answers
83 views

How to negate a boolean vector?

The !True returns False but how can I negate a boolean vector such as {True, False, True}? ...
1
vote
1answer
229 views

Need help with extracting columns from a table

I'm trying to clean a dataset of unnecessary variables but I constantly get an error when doing so. Following an example where: ...
-2
votes
1answer
100 views

Suppressing Null output with sparse data? A lot of zeros and little nonzeros

I have sparse situation with a lot of zeros, related chat. I want to see only the nonzero things or nonnull things. Example Input ...
0
votes
0answers
254 views

Hurwitz-Lerch transcendent

I want to compute the following sum over primes: $$\sum\limits_{p \text{ prime}}\sum\limits_{k=1}^\infty(\log(p^k))\left(\frac{1}{2p^k} - \Phi[-1,1,p^k]\right),$$ where $\Phi[z,s,a]$ is the ...
1
vote
4answers
160 views

Why FieldSeparators is printing a lot of quotation marks instead of just spaces?

In the following code "FieldSeparators"->" " prints a lot of quotation marks in the output file, instead of just spaces. What's wrong with it? ...
2
votes
2answers
86 views

NotebookWrite Cell with Grid

I'd like to NotebookWrite a Cell in StandardForm with a ...
4
votes
3answers
2k views

How can I save both the plot and the legend together?

In this example, How can I punt the Legend INSIDE the graph. Because when I save the graph, only save the graph BUT not save the legend. ...
1
vote
3answers
105 views

ArrayRules for a ragged list

Let there be a sample list as , l = {a, {{b, c}}, {d, e}, {f}, {{g, {y}, u, h}, {{{{k, j}}}}},k, {{{{q}, {w}, {r}, {x}}}}}; ArrayRules[l] ArrayRules::rect: ...
3
votes
1answer
275 views

How can I set constraints on parameters in NelderMeadMinimize package?

I read about NelderMeadMinimize package. How can I set constraints on the parameters? For example I want to minimize an equation with $10$ parameters such as ${a_1, a_2, ....}$. I want to put the ...
2
votes
2answers
176 views

Plot3d of explanation of partial partial derivatives

I want to plot a two functions together that looks like this: But I am only able to come up with this;"which is clearly wrong" ...
0
votes
1answer
152 views

Old notebook (Version 3) not opening in version 9

I have some old notebook files in version 3 format from the book "Mathematica for Physicists". These files are blank except for the chapter header when opened in Mathematica 9. I have similar ...
2
votes
1answer
188 views

Why does FourierTransform[] converge while same integral manually written does not?

I'm studying the quantum mechanics of an infinite square well from a computational standpoint. My eigenfunctions are defined as $u_n(x)=\sqrt{2/L}\sin\left(n\pi x/L\right),\quad 0 \le x \le L, \quad ...

15 30 50 per page