1
vote
1answer
144 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 ...
11
votes
2answers
238 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 ...
4
votes
1answer
214 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
246 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
183 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
57 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
57 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
147 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
141 views

Dark artifacts in mathematica plot

When plotting in Mathematica I just got some "dark artifacts". Here is my code: ...
2
votes
2answers
188 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
105 views

Export vector images

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

Speed up manipulate by exporting each step as an image

Consider a manipulate function such as: ...
1
vote
1answer
147 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
550 views

How to draw symmetrical parts of a circle

Let's consider the following simple case: ...
8
votes
1answer
249 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
70 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
95 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
176 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
107 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
119 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
136 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
457 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
206 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 ...
9
votes
2answers
119 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
84 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
123 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 ...
14
votes
3answers
860 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
195 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 ...
1
vote
2answers
65 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
129 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
85 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
197 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
130 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
70 views

NotebookWrite Cell with Grid

I'd like to NotebookWrite a Cell in StandardForm with a ...
2
votes
3answers
791 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
98 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
212 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
147 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
128 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
153 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 ...
1
vote
1answer
63 views

Can kernel-specific variables be accessed from stylesheets?

I'm trying to create a modified version of the Default.nb StyleSheet that adds a docked cell to act as a status bar along the top of every notebook to display some ...
2
votes
1answer
131 views

How to color the surface of the Box of 3D graphics

Is there any possibility to color the surface of the Box of a Graphic3D[]? ...
6
votes
2answers
133 views

How to Maximize[Log[n]^(1/Log[n]), n]

I am new to Mathematica and am trying to work out how to use Maximize. Maximize[Log[n]^(1/Log[n]),n] Should give a solution at $e^e$. However in Mathematica you ...
16
votes
1answer
257 views

Kernel inexplicably hangs if I define a pure function without suppressing output

Save any unsaved work before trying as it may crash Mathematica and other programs by filling up the memory! In v9.0.1.0 on OSX 10.8.5, if I start a new session and define two functions ...
11
votes
2answers
261 views

Redirect of mathematica graphics output to another computer screen

I need send the result of my calculation to the screen connected to HDMI output as a full-screen image. As I understand, I need change the DisplayFunction to usage of certain OutputStream. Do anybody ...
1
vote
1answer
104 views

Looking for a input template for Limit

I'm using v. 8. I'm looking for a limit input template (analogous to the integral template), but I can't seem to find it in any of the palettes. Can anyone help? Edit: I'm looking for a 2D input ...
3
votes
2answers
183 views

My code for solving n queens problem Compile Failed

I want to make my code for solving n-queens problem faster, but it seems that MapIndexed can't be compiled. Mathematica return CompiledFunction::cfse: Compiled ...
1
vote
0answers
124 views

Tools for finding minimal or almost-minimal graph vertex colorations in Mathematica v9?

I'm looking to compute minimum vertex colorations (s.t. no two vertices of the same color share an edge: http://en.wikipedia.org/wiki/Graph_coloring) for graphs in Mathematica v9 with potentially up ...
1
vote
1answer
108 views

How to color ParametricPlot3D based on the parameter?

I have a set of ODEs I am solving, and then plotting (several) trajectories of in ParametricPlot3D. I want to have a color of each plot reflect the time (i.e. the Parameter) at that point. I tried ...
3
votes
3answers
275 views

Generating a graph where vertices correspond to points in an integer lattice and edges connect points less than a threshold distance apart

I'd like to automatically generate a graph where vertices correspond to (and have the coordinates of) points in an $A \times B$ integer lattice, and a graph is generated by connected vertices within a ...

15 30 50 per page