# Custom plot range cropping [duplicate]

This question already has an answer here:

I'd like to plot two functions, say,

Plot[{1 + Sin[x]/4, 10 + Cos[x]/4}, {x, 0, 10}, Frame -> True] Since their amplitudes are really small, I'd like to crop the picture in such a way that I can cut off the empty part of the picture.

Usually I use the following workaround

exp2a = Plot[1 + Sin[x]/4, {x, 0, 10}, PlotStyle -> Red,
Frame -> True, FrameTicks -> {Range[0, 10], True, False, False},
AspectRatio -> .5/GoldenRatio, ImagePadding -> {{25, 2}, {15, 2}}];
exp2b = Plot[10 + Cos[x]/4, {x, 0, 10}, PlotStyle -> Blue,
Frame -> True, FrameTicks -> {False, True, Range[0, 10], False},
AspectRatio -> .5/GoldenRatio, ImagePadding -> {{25, 2}, {2, 15}}];
exp2 = Column[{exp2b, exp2a}, Spacings -> 0] And, of course, it works. The problem arises when I need to set the labels as I'd have to use something like Row and Column (it's really nasty, I'm not going to post it:-).

My question is as follows: is it possible to crop the irrelevant part of a picture in a more straighforward way? It'd be great if somehow the labeling could be done in a simple manner.

Below you can find a picture roughly describing the idea (I apologize for the poor quality). Well, here we have different a log scale and a normal scale (ote the change of ticks on the horisontal axis) but clealy it's a combination of two plot regions. In general, it would be great, if something like this could work on the vertical lines as well.