exporting or printing a pdf loses tick numbers

Questions
,
1

Hi
I’m trying to produce some simple plots that require scientific notation for both the x and y axes. The y axes look fine when saved as pdfs but the x axes lose some of the symbols, systematically. Where on-screen a tick mark might say 4.0 x 10-3 (where the -3 would be properly a power of the 10), when saved out it renders as “4.0*^-3”

The y axis is correct. I cannot for the life of me figure out why. Any ideas? Getting publishable quality plots is always hard.

The code is below and an image is attached. The axis should be m and not \mu m BTW.

thanks
Ray

Here’s the simplest code known to man…

Plot[{uull[l,6000],uull[l,5000],uull[l,4000],uull[l,3000]},{l,1/10^10,3/10^6},
PlotStyle->{{Thickness[0.005`],Red},{Thickness[0.005`],Orange},{Thickness[0.005`],Blue},{Thickness[0.005`],Green}},
PlotRange->{0.`,15 100000},
FrameLabel->{{Style[Energy Density,16,
FontFamily->"Helvetica"],None},{Style["\[Lambda],  \[Mu] m",16,
FontFamily->"Helvetica"],None}},
GridLines->None,
FrameTicksStyle->Directive[Black, 20,
FontFamily->"Helvetica"],Frame->True,
PlotPoints->1000,AspectRatio->0.5`,
ImageSize->800,
PlotLabel->Style["Blackbody Spectra",24,
FontFamily->"Helvetica"],
PlotLegends->Placed[{"6000 K","5000 K","4000 K","3000 K"},Above]]

blackbody.png
blackbody.png1666×864 70.5 KB

2

Hi Raymond,

What version do you use and what is your OS? With version 10.2 on Win7 x64 the following works for me:

pl = LogLinearPlot[{PlanckRadiationLaw[Quantity[3000, "Kelvins"], Quantity[l, "Meters"]], 
   PlanckRadiationLaw[Quantity[6000, "Kelvins"], Quantity[l, "Meters"]]}, {l, 1/10^10, 
   3*^-6}, MaxRecursion -> 1, PlotRange -> All, Frame -> True, 
  PlotStyle -> {{Thickness[0.005], Blue}, {Thickness[0.005], Red}}, 
  FrameLabel -> {{Style["spectral radiance", 16, FontFamily -> "Helvetica"], 
     None}, {Style["\[Lambda], m", 16, FontFamily -> "Helvetica"], None}}, 
  PlotLabel -> Style["Spectral Plot", 24, FontFamily -> "Helvetica"], 
  PlotLegends -> Placed[{"3000 K", "6000 K"}, Above]]

Export["pl.pdf", pl]

Here is what I see when open the file in Acrobat:

10686Буферобмена01.png
10686Буферобмена01.png533×370 26.9 KB

3

That’s interesting. I’m on a mac OS X 10.10.5 using Preview, but Acrobat Pro 9.0 does the same thing.

Ray