如何在 R 中绘制 "is proportional to" 符号

How to plot the "is proportional to" symbol in R

有人知道是否可以在 R 的表达式字符串中插入 "is proportional to" 符号吗?

使用这样的东西:

expression(x %~~% y)
expression(x %prop% y)

一个例子

# Approximately equal
x <- 1:10
y <- x + rnorm(10,0,.01)
plot(x, y, main = expression(y %~~% x))

# Proportional to...
x <- 1:10
y <- 3*x
plot(x, y, main = expression(y %prop% x))

查看 ?plotmath 文档和更多示例。