Untitled
Aclass <- c(11,16,19,18,20,23,19,21,24,29)
Bclass <- c(23,26,34,29,33,27,23,36,30,40)
plot(Aclass, Bclass)
abline(lm(Bclass~Aclass),col="blue")
體重 <-c(175, 176, 173, 175, 174, 173, 173, 176, 173, 179
Aclass <- c(11,16,19,18,20,23,19,21,24,29)
Bclass <- c(23,26,34,29,33,27,23,36,30,40)
plot(Aclass, Bclass)
abline(lm(Bclass~Aclass),col="blue")
體重 <-c(175, 176, 173, 175, 174, 173, 173, 176, 173, 179