> lm.model5f<-lm(x5~n^2,data=model2)
> summary(lm.model5f)

Call:
lm(formula = x5 ~ n^2, data = model2)

Residuals:
    Min      1Q  Median      3Q     Max
-32.036  -8.136   3.898   9.229  19.080

Coefficients:
              Estimate Std. Error t value Pr(>|t|)   
(Intercept) -678.79895  188.96632  -3.592 0.000649 ***
n              0.36541    0.09541   3.830 0.000301 ***
---
Signif. codes:  0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1

Residual standard error: 14.1 on 62 degrees of freedom
Multiple R-squared: 0.1913,     Adjusted R-squared: 0.1783
F-statistic: 14.67 on 1 and 62 DF,  p-value: 0.0003014



最后有人能告诉，图上是哪两个函数的得到的图形么？