Mathematica Stack Exchange is a question and answer site for users of Wolfram Mathematica. It only takes a minute to sign up.
Sign up to join this community
I assumed that the following plot for Sin would be red between .5 and .7, but it's all blue. Am I misunderstanding what Exclusions do? The Help is rather uninformative.
Plot[Sin[x], {x, 0, 2 π}, ExclusionsStyle -> Red,
Exclusions -> {.5 < Sin[x] < .7}]
Plot[Sin[x], {x, 0, 2 π}, Mesh -> {{.5, .7}},
MeshFunctions -> Function[{x, y}, y],
MeshShading -> {Automatic, Red, Automatic}, MeshStyle -> Green]
Clear["Global`*"]
Exclusions can be defined by equations but not by inequalities
Plot[Sin[x], {x, 0, 2 π},
Exclusions -> {Sin[x] == 0.5, Sin[x] == 0.7},
ExclusionsStyle -> {AbsolutePointSize[6], Red}]
Use ColorFunction and ColorFunctionScaling
Plot[Sin[x], {x, 0, 2 π},
ColorFunction -> Function[{x, y},
Piecewise[{{Red, 0.5 < y < 0.7}}, Blue]],
ColorFunctionScaling -> False]
Another variation could be to plot a regular curve p1 and superimpose the same curve on top of it constrained with a RegionFunction such as p2 as follows.
p1 = Plot[Sin[x]
, {x, 0, 2 π}
, PlotStyle -> {Thick, Blue}
];
p2 = Plot[Sin[x]
, {x, 0, 2 π}
, PlotRange -> All
, RegionFunction -> Function[{x}, 0.5 < Sin[x] < 0.7]
, PlotStyle -> {Thick, Red}
];
Show[p1, p2]
Exclusions, etc. or even only check?Exclusions? It's important to read the examples in the document by pressing F1 when using Mathematica. If you check them, you'll probably notice that, what you need isColorFunction. (A strongly related example can be found in Options section ofPlotdocument. ) 2. Why do you mention python'sevalin the title? Is it another question? $\endgroup$Exclusionsis to exclude singularities and documentation shows only equations, not inequalities, and some strings like"Discontinuities". To exclude part of a graph, you can use the optionRegionFunctionorConditionalExpression[Sin[x], Not[.5 < Sin[x] < .7]], but the excluded domain won't be colored. To color part of a graph, you can useMeshFunctionsandMeshShading. Can you indicate what you want? $\endgroup$Plot[Sin[x], {x, 0, 2 π}, ColorFunction -> Function[{x, y}, If[.5 < y < .7, Red, Automatic]], ColorFunctionScaling -> False], I guess. $\endgroup$evalis amount toToExpressionof Mathematica, if I understand the document ofevalcorrectly. $\endgroup$