在R中添加方程ggplots

Question

我想手動將回歸方程添加到包含正確數學符號（例如斜體，上標）的圖中。 Annotate（）看起來非常完美，但它似乎並不接受labels參數中的expression（）函數。這是一個簡單的例子。帶有expression（）的註釋將不會顯示。我究竟做錯了什麼？

library(ggplot2) 
x <- 1:10 
y <- x^2 
df <- data.frame(x, y) 
sp <- ggplot(df, aes(x, y)) + geom_point() 
sp + annotate('text', label = expression('y = x^2'), x = 2.5, y = 50) + 
     annotate('text', label = 'y = x^2', x = 2.5, y = 75) 

Answer 1

使用geom_text代替註釋：

sp + geom_text(aes(2.5,75, label=(paste(expression("y = x "^-2*"")))),parse = TRUE)