MathGroup Archive 2010

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

Search the Archive

Export[] hi-res JPEG not affecting Axes|Plot Label->

  • To: mathgroup at smc.vnet.net
  • Subject: [mg110609] Export[] hi-res JPEG not affecting Axes|Plot Label->
  • From: divisor <congruentialuminaire at yahoo.com>
  • Date: Mon, 28 Jun 2010 02:28:25 -0400 (EDT)

Hello MathGroup:

I am making some plots and exporting high-resolution JPEGs from them.
But the AxesLabel and PlotLabels are not "scaled"ed with the desired
resolution. As a result, although the graphic is "large", the user
must scroll in to read the labels.

Has anyone had this problem and/or found a workaround? Here is a
simple test case using a Documentation Center-supplied example:

f[x_, y_] := x^2 + y^2
g[x_, y_] := -x^2 - y^2
h[q, r, s] := Function[{q, r, s}, q^2 + r^2 <= 4]

Plot3D[{f[q, r], g[q, r]}, {q, -2, 2}, {r, -2, 2}
 , RegionFunction -> h[q, r, s]
 , BoxRatios -> Automatic
 , AxesLabel -> {q, r}
 , PlotLabel ->
  Style[ToString@TraditionalForm@f[q, r] <> " and " <>
    ToString@TraditionalForm@g[q, r] <> "\n constrained by " <>
    ToString@TraditionalForm@h[q, r, s]
   , Blue, Italic, 18]
 ]

Export[
 "C:\\Users\\toshW7_0611\\Documents\\iConecto\\dzcMmaT3.jpg"
 , %6, "JPEG"
 , ImageSize -> {3000, 2000}
 , ImageResolution -> 300
 ]

TIA.

Regards..

Roger Williams
Franklin Laboratory


  • Prev by Date: Re: precedence for ReplaceAll?
  • Next by Date: Re: Absolute value
  • Previous by thread: Re: numerical integration
  • Next by thread: Re: Export[] hi-res JPEG not affecting Axes|Plot Label->