Themis
  • Member for 8 years, 8 months
  • Last seen this week
Problem with simplification
Accepted answer
2 votes

Apparently your input cell contains extraneous characters (you could try FullForm on your input to see where the \.08 comes from). Retype your equation from scratch (do not copy/paste) in a new cell ...

View answer
How to plot a Histogram and compare with a particular probability density function PDF
5 votes

Use Show: Show[ Histogram[sf, {0.25}, "Probability"], Plot[f, {k, 0, 2}] ]

View answer
Carnot cycle diagram
5 votes

One way to place the arrows is to define them as custom plot markers: arrowR = {LightRed, EdgeForm[Black], Polygon[{{0, 0}, {1, 0}, {1, 1}, {1.2, 1}, {0.5, 1.4}, {-0.2, 1}, {0, 1}}]}; arrowB = {...

View answer
Importing .csv or .xlsx real data with some missing fields and procesing it for curve fitting and 3D plotting
1 votes

Edited based on the comments exchanged below. Assuming that the spreadsheet contains and that this means that at $x=2$, $y=4$ the $z$ value is 34. To enter these results in mathematica: First read ...

View answer
Change numerical $ x $-axis to strings $ x $-axis
0 votes

Use FrameTicks: data1 = {{1, 2}, {2, 1}, {3, 1}, {4, 2}}; ListLinePlot[data1, PlotStyle -> {Black}, Frame -> True, FrameStyle -> Thick, GridLines -> Automatic, PlotMarkers ...

View answer
Wrong divergence with numerical value
Accepted answer
1 votes

If you make a plot you can see that Mathematica has trouble evaluating example[q] near q=0: LogLinearPlot[Re[example[q]], {q, 0, 2}, PlotRange -> {-100000, 300000}] LogLinearPlot[Im[example[q]], {...

View answer
Partial differentiation using Mathematica
Accepted answer
3 votes

Give n a numerical value, then Mathematica will evaluate the derivative and you can check it against your result. Try several values of n to convince yourself the your result is correct. I coded your ...

View answer
How to use SendMail to send a message with URL
1 votes

This works for me: SendMail[<| "To" -> "xyz@somewhere.com", "Subject" -> "Test", "Body" -> "Here is a link: http://www.wolfram.com."> ] When I send these to myself I get an ...

View answer
Pull out scaling factor from a denominator
Accepted answer
3 votes

Here is something close to what you want expr = (a + b)/r; expr Denominator[expr] HoldForm[1/Denominator[expr] // Evaluate]

View answer
PDF Export in 11.3
Accepted answer
1 votes

I reported the bug to Mathematica (this is also a problem with EPS). Here is their answer: It does appear that Export is not behaving properly with EPS or PDF formats. I have forwarded an issue ...

View answer
Can Mathematica factor out constrained functions when it simplifies?
Accepted answer
0 votes

We need to separate functions according to their argument. Assuming the expression to be in the form of a product and the variables to be x and theta, here is one way to do this: Identify the parts ...

View answer
Help Computing the Limit of a Function
3 votes

You can plot the function to see what it looks like: Plot[dn[ud[fp, u, prob, f], f], {f, 1, 40}, AxesLabel -> {f, "dn(ud,f)"}] It does not seem to approach a limiting value.

View answer
Plot an arbitrary data column vs another column
1 votes

You can use Apply to extract the columns you want (here, 3 and 1) and place them a new list that can be entered as input to ListLinePlot. data13 = Apply[{#1, #3} &, v1v2, 1]; ListLinePlot[...

View answer
Import text outlines from PDF format properly
2 votes

It works with Times on my system (Mac 10.11.6, Mathematica 11.1.1): ImportString[ExportString[ Style["ěščřžýáíé", FontFamily -> "Times", FontSize -> 12], "PDF"], "TextMode" -> "Outlines"]...

View answer
ListLinePlot without joined the data point
4 votes

Another alternative is to insert a Null element where you want a break in the line: data2 = {{0, 0}, {0.5, 2}, {1, 5}, {2, 8.5}, {4, 10}, Null, {0, 0}, {0.5, 4}, {1, 7}, {2, 9.5}, {4, 12}, Null, ...

View answer
Problem with thickness in 3D plots
6 votes

It turns out that Dashed does not suffer from this problem. A temporary fix is to use a dashed line with ridiculously large length for the dash: ParametricPlot3D[{{Cos[t],Sin[t],.2},{Cos[t],Sin[t],-....

View answer
Basic question on producing non-overlapping graph nodes in a graph
1 votes

Use the Option ImageSize. If ImageSize->Large is not big enough, you can specify the magnification explicitly.

View answer