r - 在 R 的 intToUtf8() 中使用 UTF-8 代码？

Question

我正在尝试使用 UTF-8 代码在 R 图中的某些文本中放置一个符号。如果我想要一个黑色圆圈，我可以使用代码 intToUtf8(9679)。在哪里可以找到列出其他符号值的数据库？我想找到创建红色圆圈的代码（即 pch=16，col="red"），但我找不到特定符号的所有 unicode 值的列表。

# example R code
x <- 1:10
y1 <- rnorm(10, x*2, 0.5)
y2 <- rnorm(10, x, 0.5)
plot(x, y1, xlab='x-value', ylab='', pch=16)
points(x, y2, pch=16, col='red')
mtext(paste0('value for y1 (', intToUtf8(9679), ') and y2 (',    intToUtf8(9679), ')'), side=2, line=2)
# except that I want the second black circle in the axis label to be a red circle

谢谢你的帮助，米奇

Answer 1

这是我最终使用的解决方案。这不是最有效的，但它有效：

x <- 1:10
y1 <- rnorm(10, x*2, 0.5)
y2 <- rnorm(10, x, 0.5)
plot(x, y1, xlab='x-value', ylab='', pch=16)
points(x, y2, pch=16, col='red')
mtext('value for y1 (\u25CF) and y2 (  )', side=2, line=2)
mtext('                                   \u25CF', side=2, line=2, col='red')

# alternatively, the following would also work in place of line 6
mtext(paste0('value for y1 (', intToUtf8(9679),' and y2 (  )'), side=2, line=2)

如果您想为您的特定符号查找更多 unicode 字符信息，可以查看此处。

谢谢你lukeA在这方面的帮助。