Direct current produced by different wind velocities

Description

Data for Exercise 9.34

Usage

Windmill

Format

A data frame with 25 observations on the following 7 variables.

velocity

a numeric vector

output

a numeric vector

SRES1

a numeric vector

FITS1

a numeric vector

X1.velocity

a numeric vector

SRES2

a numeric vector

FITS2

a numeric vector

Source

Kitchens, L. J. (2003) Basic Statistics and Data Analysis. Duxbury

Examples

str(Windmill)
attach(Windmill)
summary(lm(output~velocity))
detach(Windmill)

Results

R version 3.3.1 (2016-06-21) -- "Bug in Your Hair"
Copyright (C) 2016 The R Foundation for Statistical Computing
Platform: x86_64-pc-linux-gnu (64-bit)

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.

> library(BSDA)
Loading required package: e1071
Loading required package: lattice

Attaching package: 'BSDA'

The following object is masked from 'package:datasets':

    Orange

> png(filename="/home/ddbj/snapshot/RGM3/R_CC/result/BSDA/Windmill.Rd_%03d_medium.png", width=480, height=480)
> ### Name: Windmill
> ### Title: Direct current produced by different wind velocities
> ### Aliases: Windmill
> ### Keywords: datasets
> 
> ### ** Examples
> 
> str(Windmill)
'data.frame':	25 obs. of  7 variables:
 $ velocity   : num  2.45 2.7 2.9 3.05 3.4 3.6 3.95 4.1 4.6 5 ...
 $ output     : num  0.123 0.5 0.653 0.558 1.057 ...
 $ SRES1      : num  -2.716 -1.271 -0.795 -1.378 0.471 ...
 $ FITS1      : num  0.722 0.782 0.83 0.866 0.951 ...
 $ X1.velocity: num  0.408 0.37 0.345 0.328 0.294 ...
 $ SRES2      : num  -0.313 1.052 0.75 -1.668 1.307 ...
 $ FITS2      : num  0.148 0.411 0.588 0.705 0.939 ...
> attach(Windmill)
> summary(lm(output~velocity))

Call:
lm(formula = output ~ velocity)

Residuals:
     Min       1Q   Median       3Q      Max 
-0.59869 -0.14099  0.06059  0.17262  0.32184 

Coefficients:
            Estimate Std. Error t value Pr(>|t|)    
(Intercept)  0.13088    0.12599   1.039     0.31    
velocity     0.24115    0.01905  12.659 7.55e-12 ***
---
Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1

Residual standard error: 0.2361 on 23 degrees of freedom
Multiple R-squared:  0.8745,	Adjusted R-squared:  0.869 
F-statistic: 160.3 on 1 and 23 DF,  p-value: 7.546e-12

> detach(Windmill)
> 
> 
> 
> 
> 
> dev.off()
null device 
          1 
>