New answers tagged

1

An old PlotRange option helps: ClearAll["Global`*"]; y1 = Table[i^2, {i, 10}]; ListLinePlot[{y1}, PlotRange -> {{1, 10}, {1, 100}}]


1

For the easiest part my first attempt is: Clear[simplifyOptions] simplifyOptions[(h : Graphics | Graphics3D)[first_, rest__]] := h[first, DeleteDuplicatesBy[First[#, #] &]@Flatten[{rest}]] It completely avoids both the bug in Options and its check-up for the correctness of the options list (I do not wish to fix wrong options, since it is intended for ...


Top 50 recent answers are included