Here is the code,
ClearAll;
ListPlot[ParallelTable[{x,
NIntegrate[(x - z)/(20*Sin[z]), {z, 0, 2*Pi}, MaxRecursion -> 100,
Method -> {"LocalAdaptive", "SymbolicProcessing" -> 0},
AccuracyGoal -> 5]}, {x, 0, 10, 1}], Joined ->
True, AxesLabel -> {"x", "y"},
LabelStyle -> Directive[Black, Bold],
BaseStyle -> {FontWeight -> Bold, FontSize -> 18},
PlotRange -> Automatic]
and that code gives me a triangle like curve plot on positive x axis and positive y axis.
I am attempting to plot the same thing reversed on negative axis and positive y axis without changing the range in integral or function in the integral (almost mirror like reflection). In other words, I am trying to plot the curve on negative axis by changing data plot range in list plot. However this attempt using DataRange
does not work. Is it possible?