使用表达式将希腊字母添加到 R 中的 group.names

Question

我正在尝试重命名带状图中的组名。我试过使用 bquote 和表达式，但运行遇到了同样的问题。表达式后面括号内的所有内容都打印为不带格式的组标签（因此在下面的示例中，我得到的标签显示为 "Delta ~ "Group1""。

我试过将表达式和粘贴组合起来，但这给了我一个标签，上面写着 "paste(Delta, "Group1")"。

stripchart(Df$value~Df$Treatment , 
    vertical = TRUE,
    group.names = c(expression(Delta ~ "Group1"), "Group2"),

Answer 1

尝试设置 group.names=NA，然后使用 axis 命令添加 group.names。

我无法重现您的示例，但如果您执行以下操作：

## define what you want your group.names to be using expression     
group_names=c(expression(Delta==1),expression(Delta==2),expression(Delta==3),expression(Delta==4),expression(Delta==5))

## make your strip chart
stripchart(Temp~Month, data=airquality,group.names=NA,vertical=TRUE)

## add the lower axis labels, which equivalently adds the group.names
axis(1,at=1:5,labels=group_names)

使用表达式将希腊字母添加到 R 中的 group.names

Using expression to add Greek letters to group.names in R

symbols

r

labels

stripchart