## With Safari, you learn the way you learn best. Get unlimited access to videos, live online training, learning paths, books, tutorials, and more.

No credit card required

# Time for action – the spine plot for the shift and operator data

Spine plots are drawn using the `spineplot` function.

1. Explore the default examples for the spine plot with `example(spineplot)`.
2. Enter the data for the shift and operator example with:
`ShiftOperator <- matrix(c(40, 35, 28, 26, 40, 22, 52, 46, 49),nrow=3,dimnames=list(c("Shift 1", "Shift 2", "Shift 3"), c("Operator 1", "Opereator 2", "Operator 3")),byrow=TRUE)`
3. Find the number of non-conforming parts of the operators with the `colSums` function:
```> colSums(ShiftOperator)
Operator 1 Opereator2  Operator 3
118         121          99```

The non-conforming parts for operators `1` and `2` are close enough, and it is lesser by about 20 percent for the third operator.

4. Find the number of non-conforming parts according to the shifts ...

## With Safari, you learn the way you learn best. Get unlimited access to videos, live online training, learning paths, books, interactive tutorials, and more.

No credit card required