> x [1] 1399003199 1399089599 1399175999 1399262399 1399348799 [6] 1399435199 1399521599 > y [1] 50 63 120 55 60 63 52 > lm(y ~ x) Call: lm(formula = y ~ x) Coefficients: (Intercept) x 3.130e+04 -2.232e-05 > m <- lm(y ~ x) > summary(m) Call: lm(formula = y ~ x) Residuals: 1 2 3 4 5 6 7 -21.9286 -7.0000 51.9286 -11.1429 -4.2143 0.7143 -8.3571 Coefficients: Estimate Std. Error t value Pr(>|t|) (Intercept) 3.130e+04 8.026e+04 0.390 0.713 x -2.232e-05 5.736e-05 -0.389 0.713 Residual standard error: 26.22 on 5 degrees of freedom Multiple R-squared: 0.0294, Adjusted R-squared: -0.1647 F-statistic: 0.1514 on 1 and 5 DF, p-value: 0.7132