ggplot在轴标签上的度数符号之前插入空格

Question

我想在x轴上放一个度数符号，但结果有一个额外的空间，我似乎无法摆脱它。该文字应为“温度（* C）＆＃39;”，而不是“温度（* C）＆＃39;”。我尝试了两种不同的解决方案，但似乎无法摆脱这种空间。

ggdat<-data.frame(x=rnorm(100),y=rnorm(100))

#neither of these approaches work
xlab <- expression(paste('Temperature (',~degree,'C)',sep=''))
xlab <- expression('Temperature ('*~degree*C*')')

ggplot(data=ggdat,aes(x=x,y=y)) +
  geom_point() +
  labs(x=xlab)

感谢任何帮助！

本

Answer 1

你需要你的xlabel作为表达吗？您可以尝试直接粘贴它。这样的事情有效：

{{1}}

Answer 2

当使用expression()时，〜符号会产生一个空格，而*符号会将事物粘在一起。请参阅以下代码：

ggdat<-data.frame(x=rnorm(100),y=rnorm(100))

ylab <- expression('stuck'*'together'*'eg:'*mu*'liter')
xlab <- expression('sep'~'par'~'at'~'ed'~'eg:'~mu~'liter')

ggplot(data=ggdat,aes(x=x,y=y)) +
  geom_point() +
  labs(x=xlab,
       y=ylab)