Take the 2-minute tour ×
Mathematica Stack Exchange is a question and answer site for users of Mathematica. It's 100% free, no registration required.

In an attempt to squeeze more plots and controls into the limited space for a demo UI, I am trying to remove any extra white spaces I see.

I am not sure what options to use to reduce the amount of space between the ticks labels and the actual text that represent the labels on the axes.

Here is a small Plot example using Frame->True (I put an outside Frame as well, just for illustration, it is not part of the problem here)

Framed[

 Plot[Sin[x], {x, -Pi, Pi},
  Frame -> True,
  FrameLabel -> {{Sin[x], None}, {x, 
     Row[{"This is a plot of ", Sin[x]}]}},
  ImagePadding -> {{55, 10}, {35, 20}},
  ImageMargins -> 0,
  FrameTicksStyle -> 10,
  RotateLabel -> False
  ],

 FrameMargins -> 0
 ]

Mathematica graphics

Is there an option or method to control this distance?

Notice that ImagePadding affects distance below the frame label, and not between the frame label and the ticks. Hence changing ImagePadding will not help here.

Depending on the plot and other things, this space can be more than it should be. The above is just a small example I made up. Here is a small part of a UI, and I think the space between the t(sec) and the ticks is too large. I'd like to reduce it by few pixels. I also might like to push the top label down closer to the plot by few pixels also.

Mathematica graphics

I am Using V9 on windows.

update 12/22/12

Using Labeld solution by @kguler below is a good solution, one just need to be little careful with the type-sitting for the labels. Plot automatically typeset things as Text in TraditionalFormat, which is a nice feature. To do the same when using Labeled one must do this manually using TraditionalForm and Text as well.

Here is example to show the difference

1) Labeled used just with TraditionalForm. The left one uses Plot and the right one uses Labeled with TraditionalForm. Notice the difference in how labels look.

Grid[{
  {

   Plot[Sin[x], {x, -Pi, Pi}, Frame -> True, 
    FrameLabel -> {{Sin[x], None}, {x, E Tan[x] Sin[x]}}, 
    ImageSize -> 300, FrameTicksStyle -> 10, FrameStyle -> 16,RotateLabel -> False],

   Labeled[
    Plot[Sin[x], {x, -Pi, Pi}, Frame -> True, ImageSize -> 300], 
    TraditionalForm /@ {Sin[x], x, E Tan[x] Sin[x]}, {Left, Bottom, Top}, 
    Spacings -> {0, 0, 0}, LabelStyle -> "Panel"]
   }

   }, Frame -> All]

Mathematica graphics

2) Now we do the same, just need to add Text to get the same result as Plot.

Grid[{
  {
   Plot[Sin[x], {x, -Pi, Pi}, Frame -> True, FrameTicksStyle -> 10, 
    FrameStyle -> 16, 
    FrameLabel -> {{Sin[x], None}, {x, E Tan[x] Sin[x]}}, 
    ImageSize -> 300, RotateLabel -> False],

   Labeled[
    Plot[Sin[x], {x, -Pi, Pi}, Frame -> True, ImageSize -> 300], 
    Text /@ TraditionalForm /@ {Sin[x], x, E Tan[x] Sin[x]}, {Left, 
     Bottom, Top}, Spacings -> {0, 0, 0}, LabelStyle -> "Panel"]
   }

   }, Frame -> All]

Mathematica graphics

Update 12/22/12 (2)

There is a big problem with controlling the spacing.

Labeled spacing only seem to work for horizontal and vertical spacing, taken togother.

i.e. One can't control spacing on each side of the plot separately? Here is an example, where I tried to move the bottom axes label up, this ended with moving the top label down as well. Which is not what I want.

Labeled[Plot[Sin[x], {x, -Pi, Pi}, Frame -> True, ImageSize -> 300], 
 Text /@ TraditionalForm /@ {Sin[x], x, E Tan[x] Sin[x]}, {Left, 
  Bottom, Top}, Spacings -> {-.2, -0.7}]

Mathematica graphics

Will see if there is a way to control each side spacing on its own. Trying Spacing->{-0.2,{-0.7,0}} does not work, it seems to take the zero in this case and ignored the -0.7

This gives the same result as above:

Labeled[Plot[Sin[x], {x, -Pi, Pi}, Frame -> True, ImageSize -> 300], 
 Text /@ TraditionalForm /@ {Sin[x], x, E Tan[x] Sin[x]}, {Left, 
  Bottom, Top}, Spacings -> {-.2, -0.7, .0}]

Mathematica graphics

ps. there might be a way to specify the spacing for each side with some tricky syntax. I have not figured it out yet. Still trying thing.... http://reference.wolfram.com/mathematica/ref/Spacings.html

update 12/22/12 (3) Using combination of ImagePadding and Spacing should have worked, but for some reason, the top label now is cut off. Please see screen shot. Using V9 on windows

enter image description here

Note: The above seems to be related to the issue reported here: some Graphics output do not fully render on the screen until an extra click is made into the notebook

Need an extra click inside the notebook. Then label become un-chopped !

share|improve this question
add comment

1 Answer

up vote 7 down vote accepted

The most convenient way I found is to wrap Plot (without FrameLabels and PlotLabel and with appropriate ImagePadding and ImageMargins) inside Labeled and use the Spacings option to position the labels:

 Labeled[Plot[Sin[x], {x, -Pi, Pi}, Frame -> True, 
 ImagePadding -> {{20, 1}, {15, 2}}, ImageMargins -> 0, 
 FrameTicksStyle -> 10, RotateLabel -> False], 
 TraditionalForm /@ {Sin[x], x, Row[{"This is a plot of ", Sin[x]}]}, 
 {Left, Bottom, Top}, 
 Spacings -> {0, 0}, LabelStyle -> "Panel"]

enter image description here

share|improve this answer
    
@Nasser, good point re label styles. Actually, I just threw in TraditionalForm and LabelStyle->Panel - did not try to match the default label styles of Plot. Glad to know that just adding Text does work to reproduce the font style. –  kguler Dec 22 '12 at 12:58
    
Nasser, the setting {0,0,0} was a typo - meant {0,0}. As you noticed the two numbers are horizontal and vertical spacings and these spacings apply to all the labels. Unfortunately, it seems one can not specify a pair of spacings for each of the labels as one would wish/expect. A workaround: Changing the setting for ImageMargins from 0 to {{0, 0}, {0, 10}} in Plot combined with Spacings -> {-.2, -.7} seems to work to control the positioning of the top label above the top frame. –  kguler Dec 22 '12 at 13:50
    
Nasser, try also Row[{"This is a plot of ", Sin[x]}, BaselinePosition -> Bottom] (together with ImageMargins settings). –  kguler Dec 22 '12 at 14:11
    
Right ... it does not happen in V.8.0.4. –  kguler Dec 22 '12 at 14:23
    
@Nasser, I think it is a good idea to post the issue re Show as separate question. Regarding the current question, a more robust method than the one suggested in my post is needed to fine-tune the spacings between various elements. Various alternatives that I have seen used in the past for similar Q/As (most of them about adjusting tick labels), combine Inset and wrappers like Style, Framed ... Pane around elements to be placed and playing with the settings of ImageMargins,FrameMargins, Alignment, BaselinePosition ... options. –  kguler Dec 23 '12 at 0:30
add comment

Your Answer

 
discard

By posting your answer, you agree to the privacy policy and terms of service.

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