bquote r

Usa una variable dentro de una expresión plotmath

Question

Estoy intentando colocar los resultados de una regresión (es decir, R2) en un gráfico, pero parece que no puedo averiguar cómo llamar a una variable desde dentro de una expresión (pega el nombre de la variable).

Aquí está mi código.

R2Val <- signif(summary(sMod_pre90)$r.squared[1], 2)
text(92, 4, expression(paste(R^2, " = ", R2Val)), adj = 0, cex = 0.85)

Answer 1

Me las arreglé para ponerlo juntos usando la función de sustitución.

R2Val<-signif(summary(sMod_pre90)$r.squared[1],2) text(92,4,substitute(R^2~"="~R2Val),adj=0,cex=0.85)

Todo es bueno.

Answer 2

Utilice bquote() . Aquí hay un ejemplo con datos ficticios:

set.seed(1)
DF <- data.frame(A = rnorm(100), B = rnorm(100))
mod <- lm(B ~ A, data = DF)
R2Val<-signif(summary(mod)$r.squared[1], 2)

Las partes de la expresión envuelta en .() evalúan en el entorno, es decir, se sustituye el valor de R2Val .

plot(B ~ A, data = DF)
text(1.5, 2, labels = bquote(R^2 == .(R2Val)), adj = 0, cex = 0.85)

Otra solución potencial es el substitute , que funciona de manera similar:

plot(B ~ A, data = DF)
text(1.5, 2, labels = substitute(R^2 == A, list(A = R2Val)), adj = 0, cex = 0.85)