Displaying 1 result from an estimated 1 matches for "plotmodel".
Did you mean:
plotcode
2007 Mar 13
4
'substitute' question
# I use this code to label a graph with the R2:
# graph
x <- rnorm(100)
y <- x + rnorm(100)
lm1 <- lm(y~x)
plot(x,y)
# label
R2text <- substitute(paste(R^2," = ",r2),list(r2=r2))
text(1,-3,R2text, col="red")
# i have modified this a bit, so that i have a vector with other labels,
each of which
# will be labelled on the graph. Example:
texts <- c("And the