Re: How to make large graphics object fit within a plot?
- To: mathgroup at smc.vnet.net
- Subject: [mg105273] Re: [mg105250] How to make large graphics object fit within a plot?
- From: "David Park" <djmpark at comcast.net>
- Date: Wed, 25 Nov 2009 23:01:40 -0500 (EST)
- References: <25558540.1259148317957.JavaMail.root@n11>
Nasser,
With Presentations, and in this particular case, you don't run into that
problem.
Needs["Presentations`Master`"]
Draw2D[
{Draw[Sin[x], {x, 0, 10}],
Opacity[.5, Orange],
Disk[{5, 0}, 2]},
Frame -> True]
The reason that this works is that Mathematica sees all of the graphics
primitives at once and the Disk isn't hidden in another Graphics or in an
Epilog. Nevertheless, in some cases, you may have to use a more explicit
PlotRange because Automatic may not choose what you want.
Notice that in the statement above you don't have to use Epilog or do
graphics level jumping. You just draw one object after another.
David Park
djmpark at comcast.net
http://home.comcast.net/~djmpark/
From: Nasser M. Abbasi [mailto:nma at 12000.org]
I am trying to add a disk at some location on top of an existing plot. So I
use Epilog to add the disk.
But it seems if the disk is larger than the plot image size, it gets chopped
off. I wanted the whole disk to show.
I tried increasing ImagePadding for the plot, and also ImageMargins, but
this did not help.
Here is what I tried
Plot[Sin[x], {x, 0, 10}, AspectRatio -> Automatic,
Epilog -> {Disk[{5, 0}, 2]}]
Show[Plot[Sin[x], {x, 0, 10}, AspectRatio -> Automatic],
Graphics[Disk[{5, 0}, 2]]]
Show[Plot[Sin[x], {x, 0, 10}, AspectRatio -> Automatic, PlotRange ->
Automatic],
Graphics[Disk[{5, 0}, 2]]]
None of the above works. But the below WORKS:
Show[Plot[Sin[x], {x, 0, 10}, AspectRatio -> Automatic, PlotRange ->
{Automatic,{-3,3}}],
Graphics[Disk[{5, 0}, 2]]]
So, I had to explicitly make the plot y-axis large enough to accommodate the
disk to make it 'fit'
I wanted to do this automatically. I am sure there is a way. I just thought
of something, may be I need to look at
Inset[] may be there is something there? which I'll do that next.
--Nasser