Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2010

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

Search the Archive

Re: Exporting Plot with Customized Legend to PDF

  • To: mathgroup at smc.vnet.net
  • Subject: [mg109272] Re: Exporting Plot with Customized Legend to PDF
  • From: Murray Eisenberg <murray at math.umass.edu>
  • Date: Tue, 20 Apr 2010 05:50:00 -0400 (EDT)

Export to pdf continues to be buggy when one thing has to overwrite 
another or where transparency is involved.

Normally, a work-around is to create the entire graphic with your Plot 
expression, then select the output and Save Selection As to PDF.  But 
that still didn't work here, either.


On 4/19/2010 4:10 AM, Gehricht at googlemail.com wrote:
> MyLegend =
>    Inset[Framed[
>      GraphicsGrid[{{Graphics[{Black, Thickness[0.05],
>           Line[{{0, 0}, {3, 0}}]}],
>         mystyle["109.5\[Degree]"]}, {Graphics[{Dashed, Red,
>           Thickness[0.05], Line[{{0, 0}, {3, 0}}]}],
>         mystyle["116\[Degree]"]}, {Graphics[{DotDashed, Blue,
>           Thickness[0.05], Line[{{0, 0}, {3, 0}}]}],
>         mystyle["120\[Degree]"]}}, AspectRatio ->  1,
>       Spacings ->  {0, 0}], FrameMargins ->  0, FrameStyle ->  Gray], {4,
>      0.4}, {0, 0}, 3, Background ->  White];
> Export["1.pdf",Plot[1/x, {x, 0, 10}, Epilog ->  MyLegend]]

-- 
Murray Eisenberg                     murray at math.umass.edu
Mathematics & Statistics Dept.
Lederle Graduate Research Tower      phone 413 549-1020 (H)
University of Massachusetts                413 545-2859 (W)
710 North Pleasant Street            fax   413 545-1801
Amherst, MA 01003-9305


  • Prev by Date: Re: cant free ram..
  • Next by Date: Re: cant free ram..
  • Previous by thread: Exporting Plot with Customized Legend to PDF
  • Next by thread: Re: Exporting Plot with Customized Legend to PDF