gpt4 book ai didi

r - ggplot facet_grid 标签上标

转载 作者:行者123 更新时间:2023-12-02 08:55:37 32 4
gpt4 key购买 nike

我无法在 facet_grid 中添加下标标签。这是
我一直在尝试做的工作的一个例子。

df <- data.frame(species=gl(2,10,labels=c('sp1','sp2')),
age=sample(3:12,40,replace=T),
variable=gl(2,20,labels=c('N1P1 var','N2P1 var')),
value=rnorm(40))

test.plot <- ggplot(data=df,aes(x=age,y=value)) +
geom_point() +
facet_grid(variable~species)

现在我想通过垂直分面标签制作为 'N[1]P[1] var' 等等,
其中方括号中的数字表示下标。

我已经在这个平台上咨询了一些关于这个的帮助,但没有一个帮助我。我用过 expression , bquote按照建议,但没有任何效果!

最佳答案

你需要做两件事:
首先,将您的标签设为绘图表达式

variable_labels <- 
c(expression(paste(N[1],P[1]~var)), expression(paste(N[2],P[1]~var)))

df <- data.frame(species=gl(2,10,labels=c('sp1','sp2')),
age=sample(3:12,40,replace=T),
variable=gl(2,20,labels=variable_labels),
value=rnorm(40))

然后更改 facet_grid 中的默认贴标机功能至 "label_parsed"
test.plot <- ggplot(data=df,aes(x=age,y=value)) +
geom_point() +
facet_grid(variable~species, labeller = "label_parsed")

Resulting plot

关于r - ggplot facet_grid 标签上标,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/35355367/

32 4 0