4
votes
1answer
93 views

Detrending a TimeSeries

I am trying to de-trend a time series that I know has some seasonality. So I thought I would try to use TimeSeries and DateObject functionality to do it. Here's what I have so far : ...
7
votes
1answer
92 views

Multiple PlotLegends ignore NumberForm

Imagine a set of curves data = Transpose@Table[{Exp[t], Exp[1.1 t], Exp[1.2 t], Exp[1.3 t]}, {t, 0, 5, 0.1}]; which should be labelled with numbers ...
2
votes
1answer
100 views

How to draw a density (list) polar plot?

I have the function $P_{ns}$ which gives me the amplitude of a signal. The angles $\theta_B$ and $\phi_B$ are known. (25 and 180 for example) ...
2
votes
1answer
85 views

Fitting EV charging curve

I would like to fit my set of data (x = time and y = power) as seen below, and obtain function of x describing it as close as possible, in order to manipulate it (applying different SOC, time offsets ...
1
vote
1answer
97 views

Can a computer run a Mathematica program without Mathematica? [duplicate]

I wrote a Mathematica program on my computer using my licensed copy of Mathematica. Can someone who does not have a licensed copy of Mathematica run my program?
1
vote
1answer
42 views

How to find function existence border

I have a function like this f[x_, a_] = Log[-x - a]*(-x - a) + Sin[a]; this function does exist if x > a because of Log[]. a - parameters. if I plot a few graphs ...
6
votes
3answers
148 views

Force WhenEvent to respect default stepsize

I have to numerically integrate an equation system and monitor the accumulating datapoints. For example, I fit a line to a subsample of the points and terminate via ...
2
votes
3answers
193 views

What's the proper way to 'cut out' an irrelevant part of an integral, so I don't run into problems with precision?

I'm doing a numerical integration that involves an integrand with a few exponentials whose values over the integration region range enormously. I'm really only interested in the part of the range that ...
2
votes
0answers
58 views

Buttons in graphics

I've created a workflow using Drawing Tools. It consists of Images, lines, and in some places I have cut and pasted Button objects. These buttons work fine if you paste directly into the Graphic frame....
0
votes
1answer
77 views

Making a Manipulate showing a the motion of a particle [closed]

Solving a differential equation I got to the following result -(((R[n*Pi - t/w] Cos[t/w])/(n*Pi)) Then, using this solution, I create . ...
1
vote
1answer
107 views

List Deconvolution

I have some experimental data to analyse. The function $f(t)$ that describes it is however convolved with a gaussian, due to finite resolution of our experiment. $f(t)$ is too complicated to be ...
6
votes
1answer
69 views

Can't access `AnyOrder` named parameters

Straight from AnyOrder documentation ...
4
votes
0answers
55 views

How to get f[x] to match with f[c_., x] when OneIdentity doesn't match

After setting: SetAttributes[f, OneIdentity] Default[f] = 1; We have the following successful matches: ...
6
votes
0answers
236 views

Problems with NDSolve for solving coupled Schrödinger-like PDEs with perfectly matched layer boundary condition

I'm trying to solve a full-vectorial wave equation for an arbitrarily shaped wave guide, by using NDSolve and perfectly matched layer (PML) conditions. The PML ...
3
votes
0answers
29 views

Missing Completely at Random MCAR

Many other stats packages have tests for MCAR but Mathematica doesn't seem to. Have a I missed something? If not what would a simple implementation in MMA look like. (disclaimer I'm new to MCAR ...
0
votes
0answers
52 views

Minimization with constraint define over a region

I would like to perform a 2D electrostatic minimization between two charged ellipsoids, provided that they should not penetrate each other; they can touch but they are hard ellipsoids. Here is what I ...
4
votes
1answer
77 views

How many solutions do you get from simultaneous polynomial equations?

I have the following four simultaneous polynomial equations ...
5
votes
1answer
83 views

InverseWaveletTransform not recreating the original image exactly

I am trying to do DWT steganography. I first obtain the DiscreteWaveletTransform of the image as follows ...
1
vote
1answer
107 views

Is the output to Solve ordered or are the solutions randomly placed?

I am trying to find the roots of a polynomial of eight degree $$\sin^8\varphi-2\lambda_i^2\sin^6\varphi+(6\lambda_i^2+\lambda_i^4)\sin^4\varphi-(4\lambda_i^2+2\lambda_i^4)\sin^2\varphi+\lambda_i^4=0$$ ...
6
votes
0answers
226 views

Mathematica 10.4 crashes when using too many font sizes

While working on How to make the digits of π around like this? I encountered a problem that Mathematica would crash at regular intervals with an internal self-test error, either ...
0
votes
0answers
55 views

Problems with Tooltip

I an getting strange behavior with functions built using Tooltip. I create a function to display the position of data in a list ...
0
votes
2answers
59 views

Plotting plane from a matrix or data table

After weeks collecting data I've decided to pass my results through Wolfram Alpha and see what it gets. The results are amazingly useful, specially the plane generated by linear regression. It is ...
1
vote
1answer
50 views

How to deal with repeating usage of same attributes

I am producing in my notebookfile many plots with the following example code: ...
44
votes
4answers
5k views

How to make the digits of π go around in a spiral like this?

Here is a start. MapIndexed[Text[Reverse[First[RealDigits[Pi,10,252]]][[Tr@#2]],#]&, Table[{t Cos[t],t Sin[t]},{t,0,16Pi,0.2}]]//Graphics
4
votes
2answers
101 views

How to find the background color in Placeholder

I would like to know how to find the background color used in Placeholder[abc]. It is some kind of Yellowish-Pinkish, I think. There is also a ...
4
votes
1answer
107 views

Detecting rectangle shape from an image

Motivation: I want to automate the process of analyzing "Electron SpectroMeter (ESM)" data. ESM uses magnets to bend electrons so that electrons with different energy are separated spatially. ESM ...
4
votes
2answers
136 views

Use Select to filter a dataset's sublists

In the following Dataset, I want to use Select to display only rows, which contain numbers in column ...
2
votes
1answer
94 views

Can one prevent $\TeX$ conversion from changing form of expressions?

This is similar to my previous question Can one prevent operators like `Factor` or `Apart` from changing full form of some algebraic expressions? but concerns $\TeX$ and I cannot figure out whether I ...
2
votes
1answer
84 views

How to estimate the running time of a programme on mathematica [closed]

I am solving a system of 6 linear equations containing six unknowns using mathematica. It is taking too much time and still running after 3 hours. can I estimate the approximate running time? Is there ...
0
votes
1answer
75 views

Get wrong coordinate in plot [closed]

I am having problem with getting the coordinate of points on the plot below. The plot is OK but when I press Ctr + D and move cursor along the line, the coordinates are total wrong? Could you help me?...
0
votes
1answer
68 views

How to set the current Directory as the default?

Everytime, before my code, I always write, SetDirectory[NotebookDirectory[]]; So, how to make this as the default ?
5
votes
3answers
81 views

Graphics option to suppress lines between adjoining polygons

In 10.3.1 there was a Graphics option -- it might be a sub-option of Method -- which erases the thin line visible at the join ...
3
votes
2answers
92 views

DifferenceRoot question

I was doing the following sum: $$\sum_{i=2}^k \frac{(-1)^i}{i-1} \binom{2k-i-1}{k-1}x^i$$ First, Mathematica simplifies it to some DifferenceRoot function: ...
2
votes
1answer
96 views

Putting as many expressions as possible equal to zero

Say I have a list of expressions involving many different variables. I would like to see how many of the expressions I can set equal to zero thereby solving for some of the variables in terms of the ...
2
votes
1answer
70 views

Code optimizations with functions inside Module

I wrote a small code by using functions inside Module: ...
0
votes
0answers
35 views

Is there a extend mesh generation program link with mathematica such as openfoam native blockmesh?

I have read the relative mesh tutorial in mathematica, and found that it mainly focused on finite element method with triangle and tetrahedron, so I wonder if it is possible to link a general extend ...
3
votes
2answers
186 views

the exact real solutions of cubic polynomial?

Such as the equation:$x^3-5 x+1=0$, according to the cubic discriminant we know it has three real solutions. We can also find the exact expressions of them from Mathematical handbook. However, by MMA ...
13
votes
5answers
2k views

Fit image of mountain to gaussian

I want to detect the edges of an image of a mountain and then fit that to a gaussian. I am unsure about how to only get the mountain edge, rather than every single edge in the image. How do I ...
1
vote
0answers
74 views

Exporting 3D graphics in vectorial form

I often have to export a 3D graphics to a PDF file, to be opened and edited with my favorite vectorial application ('m using Intaglio, on OS X). I frequently get two problems (see the picture below, ...
3
votes
1answer
87 views

How to plot the hour of the sunsets

i have this code: ...
3
votes
1answer
57 views

Integrating a gradient and matching terms automatically

I am trying to integrate a function $\nabla w(x,y)$ indefinitely knowing both components of $\nabla w(x,y)$. I have a function dw[x_,y_] that I have defined. I then ...
5
votes
1answer
225 views

Smooth 3D plot with colour of scattered data

I have a set of scattered 3D points with coordinate (x,y,z) and an intensity associated with it. I would like to do a smooth surface with the intensity being represented by the colour. My points ...
3
votes
2answers
68 views

Creating Boolean expressions over a set of indexed variables

I've read lots of examples here on how to set one matrix Equal to another, but how do you nest And and ...
2
votes
0answers
41 views

SoundNote options no longer built in? Does one need to download them?

A strange thing happened ... The third option in SoundNote specifies the instrument to use. If I evaluate: ...
0
votes
0answers
31 views

Generate tags for all types of headlines automatically

Is it possible to create for each headline a tag with the same content (i.e. for all Title, Chapter, Subchapter, Section, Subsection, Subsunsection) automatically? When using text processing tools ...
1
vote
1answer
49 views

Solve a backward-forward equation with a loop

I want to solve this recursive equation X[t+1] = 0.8 X[t] + 0.04 P[t+1] + 119.6; P[t_] := 0.4 X[t] + 0.8 P[t + 1]; P[t_] := S[t] X[t] - g[t]; and with these ...
4
votes
1answer
127 views

Generate FORTRAN77 code from Mathematica

I need to transform a function from Mathematica to Fortran77. An internal program FortranForm gives some result, but it works incorrectly in Fortran77. The string must start a 7th column and finish at ...
0
votes
1answer
82 views

Difficulty using NDSolve

I am tying to solve two differential equations with two delays numerically. The result didn't come out and it was written that “NDSolve::ndsz:...step size is effectively zero; singularity or stiff ...
3
votes
1answer
140 views

15 30 50 per page