Is it possible to do a plot which is partially Plot and partially LogLinearPlot? The reference figure is


We see that the $x$-axis is logarithmic up to x = 30, and linear from there on. The only idea I came up with is to use the plotGrid function of this answer, but I am not really satisfied with the result, which is attached below.


  • $\begingroup$ Another alternative would be to use Piecewise and custom ticks. $\endgroup$ Commented Apr 23, 2016 at 19:48

1 Answer 1


ScalingFunctions works for Plot, but I had to tweak the ticks by hand:

ClearAll[sfn, isfn];
SetAttributes[sfn, Listable];
SetAttributes[isfn, Listable];
sfn[x_] := Piecewise[{{x, x < 30}, {30 + Log[x] - Log[30], x >= 30}}];
isfn[y_] := Piecewise[{{y, y < 30}, {30 E^(-30 + y), y >= 30}}];

 Sin[2 Log[x]], {x, 1, 10^4},
 ScalingFunctions -> {{sfn, isfn}, None},
 Ticks -> {MapAt[
      Charting`ScaledTicks[{sfn, isfn}][sfn[0.], sfn[30.], {6, 5}],
      Charting`ScaledTicks[{sfn, isfn}][sfn[30.], sfn[10.^4], {5, 5}]}, 1],
    {All, 1}], Automatic},
 PlotRange -> All,
 AxesOrigin -> {30, 0}

Mathematica graphics


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.