多标签中的 R 表达式

R expression in multi-labels

我试过表达式和 bquote,但无法弄清楚这个...

我有一个连续变量,称之为x。我使用 cut(...) 对其进行切割以创建具有两个级别的因子。我想标记这些级别 <=10>10 但我想使用表达式或 bquote 函数(参见 plotmath 函数)来替换 <=更好的版本:

例如:

x <- rnorm(100,10,5)
x.10 <- cut(x, breaks=c(-Inf,10,Inf), labels=*expression*)

我应该将什么作为标签的参数,以便在绘制 x.10 的条形图时标签显示在条形下方?

barplot(table(x.10))

我可以让它工作:

labs <- expression(x <= ...)

plot(1, main=labs)

但是如何将其合并到条形图标签中?

不要尝试将表达式作为因子的标签。在绘图本身上应用表达式标签,例如:

set.seed(42) # always include a seed in questions with randomness
x <- rnorm(100,10,5)
x.10 <- cut(x, breaks=c(-Inf,10,Inf), labels = FALSE)

labels <- c(expression(paste(x <= 10)), expression(paste(x > 10)))
barplot(table(x.10), names.arg = labels)