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

MathGroup Archive 2008

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

Search the Archive

Exporting Plots with Labels

  • To: mathgroup at smc.vnet.net
  • Subject: [mg90283] Exporting Plots with Labels
  • From: Meaghan <FreeCaptive6914 at gmail.com>
  • Date: Fri, 4 Jul 2008 03:59:14 -0400 (EDT)

Hi.
I am trying to export a GraphicsArray of plots into any kind of image
file (I'm currently using .gif, but willing to change.)
It appears that the text labels on the plots got a huge size, while
the graphs remain small.  It's unreadable.  When I use Show[] in the
notebook, everything looks fine.  Any ideas on how to shrink the
labels, too?
Thank you!


Here's the relevant portion of code:
alldataplot = ListPlot[data,
     PlotLabel -> title, AxesLabel -> {"Log[time]", "Load*100/
Max[load]"},
       DisplayFunction -> Identity];
firstdataplot = Show[firstline,
    firstdatapts, DisplayFunction ->
       Identity, PlotLabel -> label, DisplayFunction -> Identity];
seconddataplot = Show[splot, line,
     DisplayFunction -> Identity, PlotLabel -> label2];

alldataplots = Append[alldataplots, alldataplot];
firstplots = Append[firstplots, firstdataplot];
secondplots = Append[secondplots, seconddataplot];

gra=GraphicsArray[Table[{alldataplots=E3=80=9Ai=E3=80=9B,firstplots=E3=80=
=9Ai=E3=80=9B,secondplots=E3=80=9Ai=E3=80=9B},
{i,1,Length[alldataplots]}],GraphicsSpacing->1];
Show[gra];
Export[graphsfile,gra,ImageResolution->1000,ImageSize->72];


  • Prev by Date: Re: Mathematica and Spaces on Mac Os X
  • Next by Date: Re: Anomaly? or at least a surprise.
  • Previous by thread: Re: lie symmetry package
  • Next by thread: programming a simple neural network