Skip to main content
3 of 3
edited tags

Consistent fonts in a plot

I'm trying to use consistently the fonts in a plot, but even after checking this post, the "a" on the axes is different from that near the point. This is my code:

a = {60, 25}; ListPlot[{a}, PlotStyle -> Black, BaseStyle -> {FontFamily -> "Times New Roman", 12}, AxesStyle -> Directive[Black, Thick], AxesLabel -> {L, K}, LabelStyle -> {FontFamily -> "Times New Roman", 12}, Ticks -> {{{a[[1]], "\!\(\*SubscriptBox[\(L\), \(a\)]\)"}}, {{a[[2]], "\!\(\*SubscriptBox[\(K\), \(a\)]\)"}}}, Epilog -> {Text["a", a + {0.5, 2}]}] 

In particular, I'd like the font in the subindices to match the one in the label at the point.

Patricio
  • 625
  • 3
  • 13