0
$\begingroup$

Below is the code for an example plot,

Labeled[ListLinePlot[{Thread[{{0, 360, 720}, {0, 10, 
   20}}]}],{"\!\(\*FractionBox[\(\[CapitalPsi]\), \(R\)]\)", "\!\(\*FractionBox[\(\[CapitalPsi]\),\(R\)]\)"},{Bottom, Left},RotateLabel -> False] // TraditionalForm
Export["/Users/selva/Desktop/Final/Images/test1.jpeg",TraditionalForm[%]]

I get the above image. Correct

Now if I export it to PDF/EPS using

Export["/Users/selva/Desktop/Final/Images/test1.pdf",TraditionalForm[%]]

I get below image, Wrong

In PDF export, the [CapitalPsi] is no longer in traditional form. Can someone help me with this?

Note: It work in PlotLegends but not in Labeled. Is this a bug?

$\endgroup$
0
$\begingroup$
plot = ListLinePlot[{Thread[{{0, 360, 720}, {0, 10, 20}}]}, 
        Frame -> True, RotateLabel -> False, 
        FrameLabel -> {{FractionBox["\[CapitalPsi]", "R"], ""},
        {FractionBox["\[CapitalPsi]", "R"], ""}}] // DisplayForm

fileNameSave = SystemDialogInput["FileSave", "testplot.pdf", 
                WindowTitle -> "Save plot ..."];
Export[fileNameSave, plot];

enter image description here

$\endgroup$
4
  • $\begingroup$ Will this works for EPS as well? Because I am not able to export as EPS $\endgroup$
    – Selva
    Apr 20 '16 at 19:05
  • $\begingroup$ Exchange "testplot.pdf" with "testplot.eps"... (don't forget to vote ... "arrow up" or "arrow down") $\endgroup$
    – mrz
    Apr 22 '16 at 14:26
  • $\begingroup$ Thanks for the reply... Weird it didn't work last time but now it works... $\endgroup$
    – Selva
    Apr 23 '16 at 19:58
  • $\begingroup$ I tried to but it says I need 15 reputations :( $\endgroup$
    – Selva
    Apr 24 '16 at 10:19

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service, privacy policy and cookie policy

Not the answer you're looking for? Browse other questions tagged or ask your own question.