Image:Plot regression women.svg

From Wikipedia, the free encyclopedia

• Image
• File history
• File links

[edit] Summary

Updated same figure (Image:Plot regression women.jpg), which was in JPEG format. This figure was created in R:

library(women)
n <- nrow(women)
x <- women$height
y <- women$weight
X <- cbind(rep(1, n), x, x^3)

beta <- solve( t(X) %*% X ) %*% t(X) %*% y

library(RSvgDevice)
devSVG("Plot_regression_women.svg",4,4)
plot(weight ~ height, women, main="US women weight vs. height",
     xlab="Height (in)", ylab="Weight (lbs)")
lines(x, beta[1] + beta[2]*x + beta[3]*x^3, col=2)
dev.off()

[edit] Licensing

I, the creator of this work, hereby release it into the public domain. This applies worldwide.
In case this is not legally possible,
I grant any entity the right to use this work for any purpose, without any conditions, unless such conditions are required by law.

File history

Legend: (cur) = this is the current file, (del) = delete this old version, (rev) = revert to this old version.
Click on date to download the file or see the image uploaded on that date.

• (del) (cur) 20:00, 21 January 2007 . . Mwtoews (Talk | contribs) . . 289×289 (6,528 bytes) (Updated same figure (Image:Plot regression women.jpg), which was in JPEG format. This figure was created in R: library(women) X <- cbind(rep(1,nrow(women)),women$height,women$height**3) beta <- solve(t(X)%*%X) %*% t()

• Edit this file using an external application

  See the setup instructions for more information.

File links

• Regression analysis