"""
Scale
by Denis Grutze.

Paramenters for the scale() function are values specified
as decimal percentages. For example, the
following code
will draw a scale with the values 0%, 25%, 50%, 75%, and 100%
on the x-axis:

\code
plot(1:10, scale(1:10, 0.25, 0.25, 0.25, 0.25, 0.25