All Questions

I want to plot the partial Fourier series of a function. I have this: ...

In pursuit of a function to force unsimplified fractions forceden[x_,d_]:=Hold[Evaluate[Numerator[x]d/Denominator@x]/d]; There are many related functions (...

I am trying to become more proficient with Mathematica shortcuts. To avoid using the mouse when folding a section, I am using Extend Selection CTRL+.. I press that ...

I'm defining a sparse array through ...

I would like to add a hotkey or keyboard shortcut to open a Mathematica Palettte, like e.g. the Basic Math Assistant. I found a ...

Let's say I'm writing a PDF presentation such that on slide 1, I want to show a sphere, and on slide 2 I want to continue showing the same sphere plus a point. I could draw these in Mathematica using <...

I am still learning how to use Mathematica more efficiently, but something that I keep bumping into is problems with it reducing formulas. Often, I'll ask it to compute a certain formula (take a ...

I remember a math teacher wishing us a good year with a mail title that was something like: 101 = (1 + 2 + 3)* 4 - 5*(6 - 7) + 8*9 Except the result was 2006. Is there a website that can find a number ...

As i say,is the number 8 a closed graph? And there are still a lot graphs partial the same feature.So,i just want to make clear the exact define of closed graph.

Can you please help with the following. I would like to compute the sign of an expression: ...

I have a 1st order system of two PDEs with two independent variables and two dependent variables. ...

With this code: ...

I have rational functions $\dfrac{q_1(x)}{p_1(x)},\ldots,\dfrac{q_n(x)}{p_n(x)}$ whose numerator I am trying to compute. I want mathematica to take the lcm of $p_1(x),\ldots,p_n(x)$ and express the ...

In the equation shown in the code that follows, I must find or eliminate rb, but Mathematica is reluctant to work with my Reduce ...

I read the answered question here which was for 7 years ago. I want to use DensityPlot3D function to draw a figure and save it as eps, pdf, or SVG as a vectorized ...

In the following the full context form of Test is not required as "Aaa`" is added to ...

I am using Mathematica 12.2 on Windows 10 and I am using the xTensor package for my tensor calculations. However, since today, I cannot run the xTensor package. I get the following error. Can anybody ...

I have monomials in the form $x \prod_{i=1}^n a_i^{y_i}$, and I want to return $\{x, \{y_1, ... ,y_n\}\}$. I'm hoping to have a pattern which would match a monomial of this form so I can return the $x$...

I am using FindMaximum to find the maxima and maximum value of a simple function $\sqrt{3-x^2}$ as follows: ...

Obviously there are many ways to change the global settings, such as $PlotTheme or SetOptions[], but what I'm looking for is a ...

I encountered such expressions in Mathematica MeijerG[{{ }, {1, c + 1/2}}, {{0, c, c, c}, { }}, 1] + MeijerG[{{1}, {c + 1/2}}, {{c, c, c}, {0}}, 1] which in ...

I fetch financial data like this: data = FinancialData["SBUX", "Close", {{2013, 1, 1}, {2013, 8, 1}, "Week"}, "Value"]; ...

I have an interactive code for showing the crystallographic in Mathematica. ...

I am currently in Ph.D and trying to work out some calculations in HTLpt (Hard Thermal Loop perturbative theory) which involves a lots of nasty integrals. Especially, the one I am currently trying to ...

Can somebody help me, to make these program faster? u and r are parameters, a,b,c,d,q,w,Ca are variables. I need to numerical solve these system for many values of u and r. And it take 10 seconds for ...

Consider an ArrayPlot of some arbitrary matrix with values between zero and one. ...

I have a function of two variables, say $f(a, b)$, which I want to evaluate (and later average) in the neighborhood of $a=0$ and $b=0$, with density of points around $(a,\,b)$ following a Gaussian ...

I want to numerically integrate a function of the form: ...

Consider the following: tmpExpr = {1 a, 2 a, 3 a, 4 a} (*here a proxy for possibly a very long list*); tmpIcon = Iconize[tmp, "my list"] I think it would ...

I want to create the list ix={1,1,1,1,2,2,2,2,3,3,3,3,4,4,4,4} I can do ...

I am looking to make graphics of a folder hierarchy, and this old post was very helpful. However, this method gives the whole file path for each node, which makes a complete mess in the directory I ...

I use this code ...

I use this code ...

I want to draw those data with ErrorBar and the Y-axis must be in Log scale ...

I have the following code ...

I am total beginner in Mathematica. Don't know a thing. I need to draw some diagrams for showing the conformal nature of map $w=e^z$. I need to draw some contours in $z$-plane; e.g., horizontal line, ...

First we define a context: Begin["Ctx`"]; ClearAll[f]; f[m_][n_] := n // (Range /* Append[m]); End[]; We can check that ...

relatively new to Mathematica, but couldn't find an answer online for how to do this more cleanly. I am solving these equations in six variables that give me a number of solutions, which are given as ...

I have been using SmoothHistogram to plot the probability density function $P(x)$ of some experimental data. On the y-axis, I would like to have $\log(P(x))$ ...

...

i was looking for a plot function which displays as function of Time/dates 2 series of different data, something like a ListPointPlot3D but for ...

I am running Mathematica 12.1 on Windows 10 Enterprise from a local PC with 24 cores using a remote site licence from my University. Under Parallel Configuration I have requested 24 local kernels (...

I'm working with this function ...

I'm trying to combine VectorPlot and DensityPlot on the same graph. So I have: ...

I have a basic question regarding matrices and tensor product forms. Given $N > 0$, I am interested in the tensor product series $\sum_{i}^{N} X_i$, where $X_i$ is the Pauli $X$ spin operator at ...

Here is part of a code I wrote: ...

Consider the following; Pack some integers. In[287]:= Clear[p5i, p5ic, p5icu, p5r, p5rc, p5rcu] In[288]:= p5i = ToPackedArray@Range@5 Out[288]= {1, 2, 3, 4, 5} ...

I am trying to solve this equation with integer solution $x^3 + (x + 1)^3 + (x + 2)^3 + (x + 3)^3 + (x + 4)^3 + (x + 5)^3 + (x + 6)^3 + (x + 7)^3 = y^3.$ I tried ...

Overview I want to apply a specified Chop function to every step in an function call in Mathematica (in my case LegendreP), ...

If I have a list of 100 integers, say {1,2...100}, and I wished to delete all elements that are greater than a random integer $n$, what command should I use for ...