Search Results
| Search type | Search syntax |
|---|---|
| Tags | [tag] |
| Exact | "words here" |
| Author |
user:1234 user:me (yours) |
| Score |
score:3 (3+) score:0 (none) |
| Answers |
answers:3 (3+) answers:0 (none) isaccepted:yes hasaccepted:no inquestion:1234 |
| Views | views:250 |
| Code | code:"if (foo != bar)" |
| Sections |
title:apples body:"apples oranges" |
| URL | url:"*.example.com" |
| Saves | in:saves |
| Status |
closed:yes duplicate:no migrated:no wiki:no |
| Types |
is:question is:answer |
| Exclude |
-[tag] -apples |
| For more details on advanced search visit our help page | |
Results tagged with logarithmic-scale
Search options answers only
not deleted
user 9362
Questions on applying common nonlinear scalings to functions or data--useful for making sense of data which varies over a large range.
3
votes
Accepted
Cannot Plot Log
$Version
(* "11.1.1 for Mac OS X x86 (64-bit) (April 18, 2017)" *)
Use Rationalize
Clear[f]
f[n_, prec_: 25] :=
Module[{rn = Rationalize[n, 0]},
N[1 - x^(2^(rn + 1)^a - 2^rn^a) /. {a -> 1 …
- 163k
0
votes
Scaling a LogPlot to better show its minimum
Amplifying on m_goldberg's answer
Clear[fun3, h]
Since
Cos[1.]
(* 0.540302 *)
use of Abs is unnecessary. Or just use Set rather than SetDelayed in defining fun3
fun3[h_] = (2*epsilon*Abs[Cos[1 …
- 163k
1
vote
Nothing showing up on my LogLogPlots
a[f_] := 25000/(1 + (I*f)/200)
ReImPlot[a[f], {f, 0.1, 10000}, PlotRange -> All,
ScalingFunctions -> {"Log", None},
PlotLegends -> Placed[Automatic, {.35, .6}]]
LogLogPlot[Abs[a[f]], {f, 0.1, 100 …
- 163k
1
vote
Problem with automatic numbering of values for logarithmic plotting, e.g., 0.00 substituted ...
THIS IS NOT AN ANSWER BUT RATHER AN EXTENDED COMMENT
The linked notebook in the OP does not handle precision as you expect. For example,
a = N[Rationalize[0.3493100380781557152479242154255860286824835 …
- 163k
2
votes
Floating LogScale histogram
With v13.1 it is necessary to omit specifying the PlotRange
$Version
(* "13.1.0 for Mac OS X x86 (64-bit) (June 16, 2022)" *)
Clear["Global`*"]
SeedRandom[1234];
Histogram[
RandomVariate[NormalDi …
- 163k
3
votes
Plot with ScalingFunctions->{"Infinite",interval}
$Version
(* "13.3.1 for Mac OS X ARM (64-bit) (July 24, 2023)" *)
Clear["Global`*"]
lam[pi2_] := 1/(2 pi2 - 1);
gama[pi2_, a_, t_] :=
1 - Exp[lam[pi2]*t] + 2 lam[pi2]^2*t*(pi2 - a)*Exp[lam[pi2]* …
- 163k
6
votes
Accepted
Issue with combining weighted data log histograms
Even the uneweighted data can have display (offset) problems when using Show. Also the data3 histogram obscures portions of the stacked histogram.
SeedRandom[500];
data1 = RandomVariate[NormalDistri …
- 163k
6
votes
LogPlot axes labels destroyed when working in high precision
EDIT: Problem persists with Mathematica version "10.3.1 for Mac OS X x86 (64-bit) (December 9, 2015)"
THIS IS NOT AN ANSWER but rather an extended comment providing an update for Mma v10.1.
In looki …
- 163k
1
vote
Contour plot of the imaginary portion of a function given the real part is positive
You can use Piecewise and set its default to an imaginary number so that nothing is plotted for default values.
ContourPlot[
Piecewise[{{
Im[x + I*y - Log[x + I*y]],
Re[x + I*y - Log[x + I*y …
- 163k
1
vote
Accepted
Control of SurvivalFunction probability scale
$Version
(* "11.3.0 for Mac OS X x86 (64-bit) (March 7, 2018)" *)
With your xmax == 1000, I get an error message of General::munfl (i.e., machine underflow) which is a new error message in version …
- 163k
4
votes
Accepted
How can I make a NumberLineLogPlot'?
Use the option Ticks
intervals = {{1 <= x <= 10}, {10 <= x <= 100}, {100 <= x <= 1000}};
logIntervals = intervals /. {n_?NumericQ :> Log10[n]}
(* {{0 <= x <= 1}, {1 <= x <= 2}, {2 <= x <= 3}} *)
N …
- 163k
3
votes
Accepted
Partially log x-axis?
You can use an Inset to zoom in to the Plot. Using Plot in the Inset is easier to read than using LogLinearPlot
Clear["Global`*"];
Manipulate[
Plot[
1/Abs[x - 5/1000]*1/Abs[x - 7/1000]*
Exp[19* …
- 163k
1
vote
Accepted
How can I annotate a ListLogLinearPlot with Graphics and Text?
I think this is probably compatible with v9
$Version
(* "14.0.0 for Mac OS X ARM (64-bit) (December 13, 2023)" *)
Clear["Global`*"]
cosData = Table[{N[x], N[Cos[x]]}, {x, 0, 13 Pi, Pi/20}];
point …
- 163k
3
votes
Accepted
How to plot this data with errorBar
data = {{{13.952, 364.7}, ErrorBar[36.4]}, {{19.13, 309.11},
ErrorBar[30.9]}, {{21, 294.159},
ErrorBar[29.4]}, {{26.2635, 237.26},
ErrorBar[23.7]}, {{29.0713, 191.367},
ErrorBar[19 …
- 163k
1
vote
The different solution compare to the book solution?
Clear["Global`*"]
expr = Sqrt[(3 x)/(x + 2 d)] d/(x - d);
G[d_, x_] = Integrate[expr, x]
(* -(1/(Sqrt[3] Sqrt[x]))
2 d Sqrt[x/(2 d + x)] Sqrt[
2 d + x] (Sqrt[3] ArcTanh[(d - x + Sqrt[x] Sqrt[2 d …
- 163k