Dashed arrowhead when exporting to PDF

Question

Dashed styling gets erroneously applied to the head of an Arrow when exported to PDF in version 12.1-12.2 on Mac -- it looks fine on the screen and when exported to PNG (also fine for versions 10.0-12.0).

testfig = Graphics[{Blue, Dashing[.03], Thickness[0.008], Arrow[{{0, 0}, {0, 1}}]}]
Export[StringJoin["testfig.png"], testfig, "PNG", ImageResolution -> 300];
Export[StringJoin["testfig.pdf"], testfig, "PDF"];

PDF:

PNG:

Bug? Workaround?

Possibly related (although the fix doesn't work)

Still a problem in V13.1. Did you happen to report this? It seems a bug to me. — Michael E2, Sep 03 '22 at 20:26
@MichaelE2 Looking through my old emails, I think I did not report it. — Chris K, Sep 03 '22 at 20:42

score 4 · Accepted Answer · answered Jan 08 '21 at 06:18

This works for me in v12.1.1 on Windows 10:

ah = Graphics[{EdgeForm[Thickness[0]], 
   Triangle[{{-1, .4}, {0, 0}, {-1, -.4}}]}];
testfig2 = 
 Graphics[{Blue, Arrowheads[{{.03, 1, {ah, 1}}}], Dashing[0.03], 
   Thickness[0.01], Arrow[{{0, 0}, {0, 1}}]}]
Export["testfig.pdf", testfig2]

PDF:

I don't understand why just EdgeForm[] doesn't work.

Dashed arrowhead when exporting to PDF

1 Answers1