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/Nascar.Rd_%03d_medium.png", width=480, height=480)
> ### Name: Nascar
> ### Title: Efficiency of pit crews for three major NASCAR teams
> ### Aliases: Nascar
> ### Keywords: datasets
>
> ### ** Examples
>
> str(Nascar)
'data.frame': 36 obs. of 6 variables:
$ TeamA: int 25 22 18 30 24 15 29 23 10 20 ...
$ TeamB: int 25 30 24 26 22 15 32 36 20 28 ...
$ TeamC: int 30 35 32 26 37 43 36 40 35 25 ...
$ Time : int 25 22 18 30 24 15 29 23 10 20 ...
$ Team : int 1 1 1 1 1 1 1 1 1 1 ...
$ Ranks: num 14 7.5 4 22 10.5 2.5 20 9 1 5.5 ...
> attach(Nascar)
> boxplot(Time~Team)
> anova(lm(Time~as.factor(Team)))
Analysis of Variance Table
Response: Time
Df Sum Sq Mean Sq F value Pr(>F)
as.factor(Team) 2 873.5 436.75 10.826 0.0002426 ***
Residuals 33 1331.2 40.34
---
Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
> detach(Nascar)
>
>
>
>
>
> dev.off()
null device
1
>