9
votes
3answers
254 views

Complicated list slicing

Say I have a list with the structure list = {{1, {x1, y1, z1}}, {2, {x2, y2, z2}}, {3, {x3, y3, z3}}, ...} I would like to slice it such that I end up with <...
2
votes
1answer
90 views

DynamicModule not plotting intersection region?

I am trying to show and calculate the area of two overlapping, shifted hexagons using the following code: ...
2
votes
2answers
121 views

Forcing Ticks on Lower Left Corner of Plot

I have a graph that looks like this: I need to have it labeled so that 14 appears in the lower left (I know it's obvious but that's what the publication I'm working with wants). That makes the ...
2
votes
2answers
389 views

Logarithm of a matrix in base 2?

Mathematica provides the built-in command MatrixLog, which operates on a square nonsingular matrix, but it returns the natural logarithm. How can I find the base 2 ...
4
votes
2answers
374 views

Should we invest in Apple?

Ticker[comp_String] := Interpreter["Company"][comp] /. Entity[_, x_] :> x ticks = Ticker /@ {"Apple", "Google"} {"NASDAQ:AAPL", "NASDAQ:GOOGL"} ...
0
votes
0answers
169 views

How to determine how much time it will take to finish a cell expression?

I am trying to integrate a large matrix with elements that contain trigonometric expressions. The evaluation is taking a long time--4 days, and it is still running. Is there anything I can do to find ...
0
votes
1answer
66 views

Do, Write Through

Using: Do[Write[OUTFILE, #] & @@ Through[{(#) &, Sin[#] &, Cos[#] &}[n]], {n, {1, 2, 3, 4}}] results with file content: ...
23
votes
1answer
2k views

A one line proof that one is zero using Mathematica 10

a = (Sqrt[2] + 1) (Sqrt[2] - 1) - 1; {a/a, Simplify[a]/a, b/b == Simplify[b]/b} {1, 0, True} This one line "proof" that ...
2
votes
2answers
64 views

How do I extract the value of a 'Style'?

I have a Style displaying an underlying Real value. For example I might have ...
0
votes
0answers
37 views

Is it possible to have a function with non-global parameters? [duplicate]

If I have functions in two packages that have parameters such as length_, width_ and height_; is there any way to have both packages loaded without generating messages such as "Symbol length appears ...
1
vote
1answer
84 views

Converting a testing notebook to a notebook

I build a testing notebook and it got too slow and unreliable with many test cases. I want to have a new (classical) notebook with all the the inputs I have in the testing one. Is there an automatic ...
1
vote
2answers
79 views

ListPlot3D with small (but acceptable) precision

Consider the following minimal example: ...
0
votes
2answers
96 views

Trouble representing an equation

I'm having trouble representing the following as an equation ...
0
votes
1answer
303 views

Symbol appears in multiple contexts when load two packages with unique function names

I have two packages "packageA" and "packageB". The function names across packageA and packageB are unique. No two functions have the same name. When I issue the ...
3
votes
2answers
756 views

NMinimize/NMaximize is unable to generate initial points

Mathematica 10 generates a warning that it is unable to generate initial points for numerical optimization problems. I picked a particularly simple example. The problem goes away when ...
6
votes
1answer
406 views

ListLinePlot of multiple series with data value and legend appearing as the cursor moves over ploted lines

I have multiple series and I am plotting using Mma's ListLinePlot function. But I am trying to implement a feature to my plot so that I can view legend and corresponding values of the series at a ...
3
votes
2answers
494 views

How do I display the plane of best fit in 3D?

I'm trying to display the plane of best fit in the same 3D-box. Currently, I have the following code which spits out a plot of the points in 3D. I want to have a plane of best fit, can Mathematica do ...
1
vote
1answer
82 views

Help creating a simple function

Can someone help me to create a function. The truth I'm new in Mathematica and I don't understand well the way functions work in I. I need a function that animate some rectangles according to a curve ...
21
votes
2answers
605 views

Why is TextString[-0.5] a positive number?

Bug introduced in 10.0 and fixed in 10.0.2 I want to format numbers in decimal notation and chose TextString for this task. But today, when looking at the final ...
0
votes
0answers
58 views

More on performance of Sum[]

There is an interesting discussion on performance of Sum[] in this question. I actually wanted to reproduce findings from this answer. So, I entered: ...
0
votes
2answers
330 views

Simplify trigonometric equation knowing that $\sin(a)=n \sin(b)$

I was working on a problem involving trigonometry. I used Mathematica to help me in solving it. I ended up with this formula: ...
0
votes
1answer
60 views

Programming a series involving alternative log expressions

This is likely my error but I cannot see it. I define a vector: x1 = {{{2, 2}}, {{2, 1}, {3, 1}}, {{3, 2}}, {{2, 1}, {5, 1}}} If x1[[ i, 1,2]] is 2, I would like to find $(\log$ x1[[ i,1,1]]$^2$). ...
5
votes
1answer
272 views

Forcing NonLinearModelFit through a point

Like the title says, is there a way to make an NLM fit pass through a specific point.
2
votes
1answer
306 views

Deleting empty cells and selecting cells matching a pattern

Is there any way for me to automatically select all cells that are completely empty? You know, those cells that you create but end up cutting what's in them and paste it somewhere else, so after a ...
2
votes
1answer
45 views

Linear function on strings using UpValues

I have two functions Sup and Sdown that take a string of letters with allowed characters ...
3
votes
1answer
83 views

Integrate[] does not work when the function has an antiderivative function

This function (1 + (1 + 1/(2*Sqrt[x]))/(2*Sqrt[Sqrt[x] + x]))/(2*Sqrt[x + Sqrt[Sqrt[x] + x]]) has the antiderivative function, since ...
1
vote
2answers
60 views

RecurrenceTable - does it have a solution search option like FindRoot?

I have a second-order non-linear difference equation like $$0=f(x_{t+2},x_{t+1},x_t)$$ where $x_{t+2}$ is implicitly determined. I have tried the code like ...
10
votes
1answer
439 views

How to use C language functions in Mathematica? [duplicate]

I'm trying to find out the way to use c-functions in Mathematica (I'm using 14 version) on OS X 10.10. For example I've got this lines of code: ...
6
votes
4answers
286 views

Question in ParametricPlot3D, how to join the minima of a {x,y} function

Thanks to my previous question I have plotted the function with the following code: ...
3
votes
0answers
109 views

Is it Possible to create my own Dictionary?

When I count the number of words in the English dictionary wordsInLanguage[lang_] := {lang, Length[DictionaryLookup[{lang, All}]]} wordsInLanguage["English"] it ...
0
votes
1answer
79 views

Preventing Colors of Graphics from Blending

I am displaying multiple Disks that overlap and many of the Disks are different colors. Currently, the regions in which the Disks overlap are a color that is a mixture of the two Disks. I would like ...
1
vote
1answer
106 views

Using List/Histogram Data As A Weighted Function?

I have a list of data points that I would like to use as a weighted function. The data represents the number of particles within a bin of a particle distribution. Ultimately I would like to multiply ...
1
vote
2answers
90 views

Symbolic integration of a indexed product term?

I am trying to perform the symbolic integration of the following expression $$\int \prod_{i=1}^n p(x_i | z) p(z) dz$$ where $$p(x_i|z) = \frac{exp(\frac{-(x-z)^2}{2\sigma_i^2})}{\sqrt{2 \pi \sigma_i^2}...
2
votes
2answers
63 views

Large Tuples with Negative Integers

I am trying to run a loop that cycles through the elements of Tuples[{-1,0,1},116] and terminates when a desired result is found. Unfortunately, this creates a memory problem due to 116. All of ...
2
votes
1answer
177 views

Graphic timeline from array

I found this question where someone put some code to graphic a timeline based on a certain number of events. In that code in particular, the events are hard coded one by one, I want to modify it, so ...
-1
votes
1answer
468 views

Putting two functions in one manipulate plot

I have a problem that is somewhat related to this http://stackoverflow.com/questions/7727668/putting-two-plots-in-a-manipulate-whilst-keeping-the-plots-visible but I would like to plot two functions ...
1
vote
0answers
106 views

Is there any way to solve this convex-concave like optimization problem?

This is a bit of a non-standard way of asking a question perhaps but I couldnt even think of writing any code about the following optimization problem. I wonder if it could be at all solvable and if ...
3
votes
1answer
430 views

Running Mathematica code from a command line

How can I schedule custom Mathematica code to run on my windows machine? I need to schedule some code to run on my computer (Windows, Mathematica 10.0). I'm trying to get something to run via a ...
4
votes
2answers
361 views

FindPeaks does not smooth noise on peak?

I have experimental data which is noisy. My objective is to find the peaks. Here is a short part of the data. ...
5
votes
3answers
356 views

Replace x, but not x[a] [duplicate]

I want to replace all occurences of the symbol x with x[a], as long as it is not in the form ...
11
votes
2answers
302 views

How do I override options with my own defaults?

I'm calling a function f from within a function g and would like to pass any valid options for ...
1
vote
2answers
71 views

Strange behavior of the Evaluate function

I am solving a system of differential equation whose unknown are saved under variable vec={C00,C01,C10,C11} and the solutions are saved under variable ...
1
vote
1answer
189 views

using Module in NDSolve

I am trying to solve a set of two wave equations where solution of first equation defines initial conditions for the second one. And I would like to use Module to define those equations as a function ...
2
votes
1answer
128 views

How can I adjust ContourPlot in Mathematica?

I have problem because of the max point and min point, when I have too high or low data point, it just make it white. Here is example of data ...
3
votes
3answers
344 views

How to shade a plotted region in specific direction?

I am using RegionPlot to plot a linear program maximize 30x1+25x2 with the constraints ...
1
vote
1answer
144 views

Apply functions to functions yields slow execution speed

I'm trying to write a function that parametrizes a curve c(t) by its arc length. Technicly I'm finished but if I plot the result for an example curve like ...
0
votes
0answers
138 views

Comparing heavy tailed and non-heavy tailed distribution using Mathematica

I have data from a heavy tailed distribution (see picture 1) and a non-heavy tailed distribution (see picture 2) and want to compare it using a histogram on log-scale. However the picture 3 does not ...
5
votes
3answers
495 views

Plotting jump function without vertical lines

Consider this list plot: ListPlot[{{0, 0}, {1, 2}, {3, 4}, {4, 2}, {6, 0}}] I want to draw a jump function in this list plot such that for each point I get a ...
3
votes
0answers
241 views

Position tick labels on box sides of the axis [closed]

I use ticks label both for scale (0.8, .9, 1.0, ... ) and for marking specific values of interest (with custom text). I'd like the numbers to be above the axis and the text below it. I was able to ...
3
votes
2answers
143 views

BarChart rasterized in EMF export

My boss wants several Mathematica graphics as vector graphics in EMF format. All my plots are exported neatly, except for a BarChart which gets rasterized for no apparent reason: ...

15 30 50 per page