R：在geom_vline标签上标

Question

标题说明了一切：我想在ggplot的垂直线标签上使用上标。 这是一个不太美丽的例子：

df <- data.frame(x = c(1:10),y = c(2,2,3,4,5,5,6,7,5,4))

ggplot(data=df, aes(x,y, group=1)) +
  geom_line() +
  scale_x_reverse() +
  geom_vline(xintercept=3) +
  geom_text(aes(x=3, label=paste("3400","cm","^-1", sep=""), y=5), angle=90, vjust = 1.2)

我想要-1上标。在绘图轴标签上有很多解决方案，但这些都不适用于此。有人可以帮忙吗？

Answer 1

你真是太近了！您只需在import {Component} from 'component-folder/component'中设置import {Component} from '../../node_modules/component-folder/component'并使用Unexpected value 'Component' declared by the module 'AppModule'语法。

parse=TRUE

结果：

另外，请注意文本不如代码模糊。这是因为您的代码实际上是在同一坐标处打印标签10次。您需要geom_text使用不同的数据或更好，但请使用?plotmath