Message Boards Message Boards

0
|
6275 Views
|
3 Replies
|
0 Total Likes
View groups...
Share
Share this post:

Graph reduces size when clicked

Posted 9 years ago

I run into all the time... and have a moment to ask about it. Hopefully someone can clarify. When I execute the following code the first time, the output is a graph in a large size. Once I click the graph it becomes smaller. Even if I execute the code again... it does not go back to the larger size. I have to erase the output and then execute again to reproduce the larger size graph.

Axis3D[a_, b_, c_, d_, e_, f_] := Show[
  Graphics3D[{Arrowheads[.02], Arrow[{{0, 0, e}, {0, 0, f}}]}],
  Graphics3D[{Arrowheads[.02], Arrow[{{0, c, 0}, {0, d, 0}}]}],
  Graphics3D[{Arrowheads[.02], Arrow[{{a, 0, 0}, {b, 0, 0}}]}],
  Graphics3D[{Text["\!\(\*
StyleBox[\"x\",\nFontWeight->\"Plain\"]\)", {b*1.1, 0, 0}], 
    Text["y", {0, d*1.1, 0}], Text["z", {0, 0, f*1.1}]}], 
  Boxed -> False, ViewPoint -> {8, 4, 4},  ViewVertical -> {0, 0, 1}]
Axis3D[0, 3, 0, 3, 0, 9]

My question is, is this a setting that can be changed? Can I make my graphs default to the smaller size? I would like to have NO jump in size when I'm click through a notebook. Thank you in advance.

Mike

POSTED BY: Michael McCain
3 Replies

Thank you Jos! The issue appears when you have magnification set greater than 100%.

Thank you for the help with the example image option. I wasn't aware of that. This gives me something to play with.

I was hoping to find an option that would allow me to disable the default image, and instead default to the image you get after the graph is clicked. This would solve my problem, as I have many animations with many different sizes.

POSTED BY: Michael McCain

Hi Michael,

For your information only. A further example with ImageSize->1.1{400,200}.

Regards,......Jos

Axis3D[a_, b_, c_, d_, e_, f_] := Show[
  Graphics3D[{Arrowheads[.02], Arrow[{{0, 0, e}, {0, 0, f}}]}]
  , Graphics3D[{Arrowheads[.02], Arrow[{{0, c, 0}, {0, d, 0}}]}]
  , Graphics3D[{Arrowheads[.02], Arrow[{{a, 0, 0}, {b, 0, 0}}]}]
  , Graphics3D[{Text["\!\(\*
          StyleBox[\"x\",\nFontWeight->\"Plain\"]\)", {b*1.1, 0, 0}]
    , Text["y", {0, d*1.1, 0}], Text["z", {0, 0, f*1.1}]}], 
  Boxed -> False
  , ImageSize -> 1.1 {400, 200}
  , ViewPoint -> {8, 4, 4}
  , ViewVertical -> {0, 0, 1}]
Axis3D[0, 3, 0, 3, 0, 9]
POSTED BY: Jos Klaps

Hi Mike,

I don't see the problem on my machine. MM10.2. - Windows 7 But you can set as example the ImageSize->{100,200}.

Axis3D[a_, b_, c_, d_, e_, f_] := 
 Show[Graphics3D[{Arrowheads[.02], Arrow[{{0, 0, e}, {0, 0, f}}]}], 
  Graphics3D[{Arrowheads[.02], Arrow[{{0, c, 0}, {0, d, 0}}]}], 
  Graphics3D[{Arrowheads[.02], Arrow[{{a, 0, 0}, {b, 0, 0}}]}], 
  Graphics3D[{Text["\!\(\*
     StyleBox[\"x\",\nFontWeight->\"Plain\"]\)", {b*1.1, 0, 0}], 
    Text["y", {0, d*1.1, 0}], Text["z", {0, 0, f*1.1}]}], 
  Boxed -> False,
  ImageSize -> {100, 200},
  ViewPoint -> {8, 4, 4}, ViewVertical -> {0, 0, 1}]
Axis3D[0, 3, 0, 3, 0, 9]
POSTED BY: Jos Klaps
Reply to this discussion
Community posts can be styled and formatted using the Markdown syntax.
Reply Preview
Attachments
Remove
or Discard

Group Abstract Group Abstract