bobba...@frii.com
unread,May 2, 2014, 2:17:54 AM5/2/14Sign in to reply to author
Sign in to forward
You do not have permission to delete messages in this group
Sign in to report message as abuse
Either email addresses are anonymous for this group or you need the view member email addresses permission to view the original message
to
In Mathematica version 8, the code below creates a file that is 38 KB.
But in version 9, the code creates a file that is 872 KB.
f[x_] := Sum[Sin[n x]/n, {n, 1, 100}] ;
f1Plot = Plot[f[x], {x, -Pi, Pi}, PlotRange -> 2]
Export["C:\\JUNK\\f1Plot.pdf", f1Plot]
Is there a way in version 9 to create a pdf file of reasonable size?