efficiency.criteria {dae} | R Documentation |

## Computes efficiency criteria from a set of efficiency factors

### Description

Computes efficiency criteria from a set of efficiency factors.

### Usage

`efficiency.criteria(efficiencies)`

### Arguments

`efficiencies` |
A |

### Details

The `aefficiency`

criterion is the harmonic mean of the nonzero
efficiency factors. The `mefficiency`

criterion is the mean of
the nonzero efficiency factors. The `eefficiency`

criterion is the
minimum of the nonzero efficiency factors. The `sefficiency`

criterion is the variance of the nonzero efficiency factors. The
`xefficiency`

is the maximum of the efficiency factors. The
`order`

is the order of balance and is the number of unique
nonzero efficiency factors. The `dforthog`

is the number of
efficiency factors that are equal to one.

### Value

A `list`

whose components are `aefficiency`

,
`mefficiency`

, `sefficiency`

, `eefficiency`

, `xefficiency`

,
`order`

and `dforthog`

.

### Author(s)

Chris Brien

### See Also

`proj2.efficiency`

, `proj2.eigen`

, `proj2.combine`

in package dae,
`eigen`

.

`projector`

for further information about this class.

### Examples

```
## PBIBD(2) from p. 379 of Cochran and Cox (1957) Experimental Designs.
## 2nd edn Wiley, New York
PBIBD2.unit <- list(Block = 6, Unit = 4)
PBIBD2.nest <- list(Unit = "Block")
trt <- factor(c(1,4,2,5, 2,5,3,6, 3,6,1,4, 4,1,5,2, 5,2,6,3, 6,3,4,1))
PBIBD2.lay <- designRandomize(allocated = trt,
recipient = PBIBD2.unit,
nested.recipients = PBIBD2.nest)
## obtain sets of projectors
unit.struct <- pstructure(~ Block/Unit, data = PBIBD2.lay)
trt.struct <- pstructure(~ trt, data = PBIBD2.lay)
## save intrablock efficiencies
eff.inter <- proj2.efficiency(unit.struct$Q[["Unit[Block]"]], trt.struct$Q[["trt"]])
## calculate efficiency criteria
efficiency.criteria(eff.inter)
```

*dae*version 3.2.28 Index]