Last data update: 2014.03.03

R: Reaction effects of 4 drugs on 25 subjects with a nervous...
NervousR Documentation

Reaction effects of 4 drugs on 25 subjects with a nervous disorder

Description

Data for Exercise 10.3

Usage

Nervous

Format

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

react

a numeric vector

drug

a numeric vector

Source

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

Examples

str(Nervous)
attach(Nervous)
boxplot(react~drug)
anova(lm(react~as.factor(drug)))
detach(Nervous)

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/Nervous.Rd_%03d_medium.png", width=480, height=480)
> ### Name: Nervous
> ### Title: Reaction effects of 4 drugs on 25 subjects with a nervous
> ###   disorder
> ### Aliases: Nervous
> ### Keywords: datasets
> 
> ### ** Examples
> 
> str(Nervous)
'data.frame':	25 obs. of  2 variables:
 $ react: int  3 5 4 6 4 5 7 3 4 5 ...
 $ drug : int  1 1 1 1 1 2 2 2 2 2 ...
> attach(Nervous)
> boxplot(react~drug)
> anova(lm(react~as.factor(drug)))
Analysis of Variance Table

Response: react
                Df Sum Sq Mean Sq F value    Pr(>F)    
as.factor(drug)  3 43.021 14.3403  8.1791 0.0008504 ***
Residuals       21 36.819  1.7533                      
---
Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
> detach(Nervous)
> 
> 
> 
> 
> 
> dev.off()
null device 
          1 
>