Annotation ggplot2 avec des exposants

Comment inclure un exposant et en ggplot annotation? Je veux afficher Rsuperscript2 = somevalue
J'ai essayé d'utiliser parse=TRUE à l'intérieur d'annoter.. Il m'a donné = Rsuperscript2 , somevalue au lieu

lm1 <- lm(dData$RF ~ dData$Exp -1)
lb1 <- paste("R^2 = ", round(summary(lm1)$r.squared,4))
p1 <- ggplot(dData, aes(x=dData$Exp, y=dData$RF)) +
  scale_x_continuous("Experimental") + 
  scale_y_continuous("Predicted") + 
  geom_point() + geom_smooth(method="lm") + 
  annotate("text", x=max(dData$Exp), y=min(dData$RF)+1, label=lb1, 
           hjust=1, size=3, vjust=1)

source d'informationauteur lochi

ggplot2 r

30

Est le problème avec les exposants ou avec le signe égal? La commutation de l' == dans l'expression, avec parse=TRUE fonctionne pour moi. N'ayant pas votre dDataici, est un mannequin exemple.
```
lb1 <- paste("R^2 == ", round(runif(1),4))
qplot(1:10, 1:10) + 
  annotate("text", x=2, y=8, label=lb1, parse=TRUE)
```

Vous devez vous connecter pour publier un commentaire.