I am using Mathematica 13.2 on Ubuntu. I was trying to reproduce a plot that I made using Mathematica 12, but symbols seem to not export correctly to PDF. 

I have boiled my problem down to a minimal-ish working example. Consider this simple plot of $\sin (x)$.

    Plot[Sin[x], {x, -3, 3}
      , ImageSize -> Large
      , TicksStyle -> Directive[FontSize -> 25]
      , LabelStyle -> {Directive[FontSize -> 40, FontColor -> Black], 
        Directive[FontSize -> 40]}
      , AxesLabel -> {"x", 
        "\!\(\*SubscriptBox[\(\[Psi]\), \(\[Pi]\)]\)(x)"}
      , PlotRangePadding -> {0.2, 0.2}
      , PlotStyle -> {{Red, AbsoluteThickness[t1*1.5]}}
      , PlotLegends -> 
       LineLegend[{Directive[Red, AbsoluteThickness[t2]]}, 
        Style[#, 35, 
           FontFamily -> "Latin Modern Math"] & /@ {"Test (blep)"}, 
        LegendMarkerSize -> l]
      ] /. {t1 -> 3, t2 -> 6, l -> 40}

The plot that is generated in the Mathematica notebook is perfectly correct.

[![enter image description here][1]][1]

I then export this plot to PDF using the following command:

    Export["/home/myComputer/test.pdf", %, "PDF"]

The plot in the generated PDF file does not have correct axes & legend labels. All symbols appear to be screwed up.

[![enter image description here][2]][2]

**Any idea how to correct this?**


  [1]: https://i.sstatic.net/Ql2vn.png
  [2]: https://i.sstatic.net/Jx9ZY.png