# intensity: Blocking for Intensity Data Set In ACSWR: A Companion Package for the Book "A Course in Statistics with R"

## Description

The intent of this experiment is to help the engineer in improving the ability of detecting targets on a radar system. The two variables chosen which are believed to have the most impact on the detecting abilities of the radar system are marked as the amount of the background noise and the type of filter on the screen.

## Usage

 `1` ```data(intensity) ```

## Format

A data frame with 24 observations on the following 4 variables.

`Intensity`

intensity of targets

`Operator`

different operators who form the blocks `1` `2` `3` `4`

`Filter`

two types of filter `1` `2`

`Ground`

the type of background noise `high` `low` `medium`

## References

Montgomery, D. C. (1976-2012). Design and Analysis of Experiments, 8e. J.Wiley.

## Examples

 ```1 2 3 4``` ```data(intensity) intensity.aov <- aov(Intensity~Ground*Filter+Error(Operator),intensity) summary(intensity.aov) intensity.aov ```

### Example output

```Error: Operator
Df Sum Sq Mean Sq F value Pr(>F)
Residuals  3  402.2   134.1

Error: Within
Df Sum Sq Mean Sq F value   Pr(>F)
Ground         2  335.6   167.8  15.132 0.000253 ***
Filter         1 1066.7  1066.7  96.192 6.45e-08 ***
Ground:Filter  2   77.1    38.5   3.476 0.057507 .
Residuals     15  166.3    11.1
---
Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1

Call:
aov(formula = Intensity ~ Ground * Filter + Error(Operator),
data = intensity)

Grand Mean: 94.91667

Stratum 1: Operator

Terms:
Residuals
Sum of Squares   402.1667
Deg. of Freedom         3

Residual standard error: 11.57824

Stratum 2: Within

Terms:
Ground    Filter Ground:Filter Residuals
Sum of Squares   335.5833 1066.6667       77.0833  166.3333
Deg. of Freedom         2         1             2        15

Residual standard error: 3.329998
Estimated effects may be unbalanced
```

ACSWR documentation built on May 2, 2019, 6:53 a.m.