View(windprecip)
> summary(windprecip)
Wind Precipitation
Min. : 0.00 Min. : 0.00
1st Qu.:100.00 1st Qu.: 0.00
Median :100.00 Median :100.00
Mean : 79.52 Mean : 73.49
3rd Qu.:100.00 3rd Qu.:100.00
Max. :100.00 Max. :100.00
> plot(windprecip)
> cor(windprecip)
Wind Precipitation
Wind 1.00000000 0.03341267
Precipitation 0.03341267 1.00000000
> windprecip.lm <- lm(wind ~ precipitation, data = windprecip)
Error in eval(predvars, data, env) : object 'wind' not found
> windprecip.lm <-(Wind ~ Precipitation, data = windprecip)
Error: unexpected ',' in "windprecip.lm <-(Wind ~ Precipitation,"
> windprecip.lm <- lm(Wind ~ Precipitation, data = windprecip)
> summary(windprecip)
Wind Precipitation
Min. : 0.00 Min. : 0.00
1st Qu.:100.00 1st Qu.: 0.00
Median :100.00 Median :100.00
Mean : 79.52 Mean : 73.49
3rd Qu.:100.00 3rd Qu.:100.00
Max. :100.00 Max. :100.00
>
> windprecip.lm <- lm(Wind ~ Precipitation, data = windprecip)
> summary(windprecip.lm)
Call:
lm(formula = Wind ~ Precipitation, data = windprecip)
Residuals:
Min 1Q Median 3Q Max
-80.33 19.67 19.67 19.67 22.73
Coefficients:
Estimate Std. Error t value Pr(>|t|)
(Intercept) 77.27273 8.70484 8.877 1.39e-13 ***
Precipitation 0.03055 0.10154 0.301 0.764
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
Residual standard error: 40.83 on 81 degrees of freedom
Multiple R-squared: 0.001116, Adjusted R-squared: -0.01122
F-statistic: 0.09053 on 1 and 81 DF, p-value: 0.7643