R绘图轴标签中的粗体表达式

Question

我正在尝试绘制一张地图，其轴标签分别是经度为°E和°W的经度，纬度为°S和°N的纬度。例如，使用BO_ 96 DEVICE_51900450_0: 8 C_51900450 SG_ Beschleunigung : 0|16@1+ (0.000152590218966964,-5) [-5|5] "V" IPETRONIK_CAN_1 SG_ Pos : 48|16@1+ (0.000152590218966964,0) [0|10] "V" IPETRONIK_CAN_1 没问题。

问题是我想使这些标签变为粗体，而当我使用(228, 127, 3, 0) (228, 127, 3, 0) (228, 127, 62, 3) (228, 127, 162, 16) (228, 127, 143, 28) (228, 127, 252, 93) 时，仅“ N”为粗体，而不是“ 30”，也不是度数符号（“°”）。

以下示例将向您确切显示我的问题：

expression(30~degree~N)

作为示例，我仅将expression(bold(30~degree~N))用于150°W，如您所见，我只有粗体的“ W”：

您会注意到，我也尝试过par(mar=rep(6,4)) library(maps) image(seq(-180,180,1),seq(-90,90,1),array(NA,c(length(seq(-180,180,1)),length(seq(-90,90,1)))),xlab="",ylab="",xaxt='n',yaxt='n') map(add=T,interior=F,lwd=3) axis(1,at=seq(-200,200),rep(NA,401),lwd.ticks=0,lwd=5) axis(3,at=seq(-200,200),rep(NA,401),lwd.ticks=0,lwd=5) axis(2,at=seq(-100,100),rep(NA,201),lwd.ticks=0,lwd=5) axis(4,at=seq(-100,100),rep(NA,201),lwd.ticks=0,lwd=5) par(font=2) axis(1,at=seq(-150,150,30),c(expression(bold(150~degree~W)),expression(120~degree~W), expression(90~degree~W),expression(60~degree~W), expression(30~degree~W),expression(0~degree), expression(30~degree~E),expression(60~degree~E), expression(90~degree~E),expression(120~degree~E), expression(150~degree~E)),lwd.ticks = 5,cex.axis=1.1,font.axis=2,tck=.022,las=2) 和bold，但都没有解决我的问题。