4
$\begingroup$

Is there a simple way, besides changing my function to use Degree as input, to display the x-axis in degrees in a plot of a function defined with its independent variable taking radians?

$\endgroup$
2
  • 1
    $\begingroup$ It does not get simpler than Plot[f[x Degree],{x,-1,1}] , and you can control exactly what is shown on the axis with the Ticks option of Plot. Theoretically you could do post-processing on the Graphic object but that seems to me to be overkill. $\endgroup$ Mar 13, 2014 at 20:00
  • $\begingroup$ not about Degree but duplicate imo. Also related $\endgroup$
    – Kuba
    Mar 13, 2014 at 20:46

1 Answer 1

4
$\begingroup$
f[range_List, divs_] := {# Pi/180, # Degree} & /@ FindDivisions[range 180/Pi, divs, 10]; 
plot[g_, range_]:= Plot[g[x], Evaluate@Join[{x}, range], Ticks-> {f[range, 10], Automatic}];
g = Sin;
plot[g, {0, 2 Pi}]

Mathematica graphics

$\endgroup$
3
  • $\begingroup$ Interesting, I din't know about FindDivisions. +1 $\endgroup$
    – Murta
    Mar 13, 2014 at 20:25
  • 1
    $\begingroup$ @Murta The function doesn't work very well. The standard Plot[] automatic ticks are much more robust. $\endgroup$ Mar 14, 2014 at 0:27
  • $\begingroup$ Is there a way to keep the nice sub-ticks when replacing the tick labels? $\endgroup$ May 2, 2016 at 14:08

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service and acknowledge you have read our privacy policy.

Not the answer you're looking for? Browse other questions tagged or ask your own question.