如图,我使用SwatchLegend书写了图右侧和下侧的图例。容易发现,Lu_2 O_3和Y_2 O_3变成了斜体。恳请诸位前辈指教,如何让这样的斜体不出现?
代码如下:
ListLogLogPlot[{0,0},
PlotRange -> {{1, 25}, {100, 400}},
Frame -> True,
FrameLabel -> {"x轴", "y轴"},
FrameStyle -> Black,
LabelStyle -> Directive[Black, FontFamily -> "Times New Roman"],
PlotLegends ->
{SwatchLegend[{Blue, Red, Green}, {"A", "B", "C"}],
(*无色的形状代表材料类型*)
SwatchLegend[
Table[Transparent, 5], {"KYW", "KGW",
"\!\(\*SubscriptBox[\(Lu\), \(2\)]\)\!\(\*SubscriptBox[\(O\), \
\(3\)]\)", "Yb:CALGO",
"Yb:\!\(\*SubscriptBox[\(Y\), \(2\)]\)\!\(\*SubscriptBox[\(O\), \
\(3\)]\)"},
LegendMarkers ->
Insert[Table[
Graphics[Style[RegularPolygon[i], EdgeForm[Black]]], {i, 3,
7}], Graphics[Style[Disk[], EdgeForm[Black]]], 1]]}
]
图片版代码:
==========
失败的尝试:
我曾经尝试了Subscript["Lu", "2"] Subscript["O", "3"],但有很大的瑕疵:1. 这两个之间多了空格;2. 对于Y_2 O_3来说,由于自动排序的存在,Y_2会跑到O_3后面。
ToString无法保存数学格式。笔记本中看到的"Lu_2 O_3"其实并非标准的字符串格式。
==========
再次恳请诸位大大高抬贵手!