Services & ResourcesWolfram ForumsMathGroup Archive

[Date Index] [Thread Index] [Author Index]

Re: How to make large graphics object fit within a

• To: mathgroup at smc.vnet.net
• Subject: [mg105482] Re: [mg105448] How to make large graphics object fit within a
• From: Patrick Scheibe <pscheibe at trm.uni-leipzig.de>
• Date: Fri, 4 Dec 2009 04:34:02 -0500 (EST)
• References: <200912031113.GAA01079@smc.vnet.net>

Hi,

what about putting the PlotRange in the Show[]?

Show[{
  Plot[Sin[x], {x, -Pi, Pi}],
  Graphics[{Hue[Random[]], Point[#]} & /@ RandomReal[{-3, 3}, {20, 2}]]
  }, PlotRange -> Automatic, AspectRatio -> Automatic]



Cheers
Patrick

On Thu, 2009-12-03 at 06:13 -0500, Nasser M. Abbasi wrote:
> 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 
> 
> 

• References:
  • How to make large graphics object fit within a plot?
    • From: "Nasser M. Abbasi" <nma@12000.org>