带下标的Unicode字符
我想添加一个Unicode字符，其中包含两个字母作为我的情节图例中的下标。字符是一个带有口音（r）的r，两个字母是i和j。
我已经看过这个问题：带上标的Unicode字符，并尝试将答案适应于我的问题。
这是我试过的：
plot(1,pch=NA,ylab="",xlab="",axes=F)
legend("top",legend=paste("1-","u{0159}"),bty ="n",bg = "white",cex=2)
legend("center",legend=paste("1-","u{0159}","u{0069}","u{006A}"),bty="n",bg = "white",cex=2)
legend("bottomleft",legend=expression("1-"*"u0159"["u0069"*"u006A"]),bty="n",bg = "white",cex=2)
legend("bottomright", legend = quote("1-" *"u0159"["u0069"*"u006A"]),bty="n",bg = "white",cex=2)
结果图可以在下面找到
Unicode字母和下标都可以自行工作，但不能在一起工作。 粘贴（）与[]的任意组合都会返回一个错误，但我认为这是预期的，因为粘贴不能处理下标的[]。
CRAN上的FAQ站点可能会提示我使用Windows，但我不确定如何实现此操作：
3.6我在R控制台上看不到带有重音的字符，例如？文本。
您需要在支持正在使用的编码的Rconsole中指定字体（请参阅Q5.2）。 这在以前的Windows版本中曾经是一个问题，但现在很难找到没有的字体。
Rterm中对这些字符的支持取决于运行时的环境（终端窗口和shell，包括语言环境和代码页设置）以及终端窗口使用的字体。 这些通常在传统的DOS设置上，需要修改。
它与系统区域设置有关，例如，如果你尝试了
# intToUtf8(345)
# [1] "ř"
# iconv(intToUtf8(345), "utf-8", localeToCharset())
# [1] "r"
这应该解决它（我使用捷克语，但其他语言环境也可能工作）：
Sys.setlocale("LC_CTYPE", "czech")
# [1] "Czech_Czech Republic.1250"
text(..., labels = quote("u{0159}"[ij]))